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@Microsoft, MS. MS-DOS. Code View は ., 米国 マイ クロ ソフ ト 社 の 登録 商標 で す 
⑯QuickBASIC は . マ イク ロ ソ フト 株 式 会 社 の 製品 で す 


は じ め に 





この 本 Quick BASIC ハンドブック Vol.2 リフ ァ レ ンス 』」 は 、 マ イク ロ ソ 
フト 社 の 最新 の プロ グラ ミン グ 言 語 "Quick BASIC バー ジョ ン 4.5” の 使い 方 に 
つい て 書い て あり ます 。 

QuickBASIC を 使 を る を よう に な る に は 、 


『 統合 環境 
『 言語 体系 
構造 化 プ ログ ラミ ング の 仕方 


に つい て マス ター し な けれ ば な り ま せん 。 そ の 環境 や ツー ル の 使い 方 を 理解 し 
て お か な いと 快適 で 効率 よい プロ グラ ミン グ を 行 な を な いで し ょ うし 、 ま た プ 
ログ ラム を 構造 化し た スタ イル で 一 貫 し て 書か な いと 宝 の 持ち 腐れ に な っ て し 
まい ます 。 

この 本 で は 、 


「QuickBASIC の 言語 体系 」 
を 中 心 に まとめ まし た 。 
「QuickBASIC の 統合 環境 」 


に つい て は 、 本 書 と カッ プル に な っ て いる 同 シ リー ズ の 『Quick BASIC ハ ンド 
ブッ ク Vol1 基本 操作 ] に お いて 扱っ て いま す 。 

な お 、QuickBASIC を 使っ た 「 構 造 化 プ ログ ラミ ング の 仕方 」、 に つい て は 、 
ハン ディ ・ シ リー ズ の 人 性質 上 、 意識 し て 取り 扱い ませ ん で し た 。 そ の 代わ り に 、 
この 本 で は 、 以 下 に 掲げ る 


は じ め に 一 1 


言語 仕様 
すべ て の ステ ー ト メン ト 
すべ て の 関数 

すべ て の メタ ・ コ マン ド 


に つい て 網羅 的 で か つ 簡 潔 に 書い て あり ます 。 ま た 、 


。 は じ め て 使う と き に 行なう セッ ト ア ッ プ の 仕方 
- QuickBASIC の 起動 の 仕方 と 終わ り 方 
- 統合 環境 ウィ ンド ウ 
yp メニ ュー に お ける すべ て の コマ ンド 
すべ て の ダイ アロ グ ・ ボ ックス 
> すべ て の キー 操作 と マウ ス 操 作 
j ファ イル 管理 ・ 編 集 ・ 実 行 
コマ ンド ・ ラ イン で の 使い 方 
j CodeView の 使い 方 


に つい て は 、『QuickBASIC ハン ドブ ッ ク Vol1 基本 操作 』 を 利用 し て くだ さ 
い 。 

"QuickBASIC" と この 本 が 多く の 読者 に 役立つ こと を 確信 し て いま す 。 こ の 
本 を 読ん で QuickBASIC の 仲間 が 増え れん ば 、 こ の うえ な い 喜 びと する と ころ で 
0 

最後 に な り ま し た が 、 こ の 本 の 企画 お よび 編集 に あたら れ た ナツ メ 出 版 企画 
人 帆 の 山路 和彦 氏 に 感謝 する と と も に お 礼 を 申し あげ ます 。 


1990 年 6 月 1 日 
阿部 友 計 





この 本 の 構成 





この 本 は 、 全 部 で 5 つの 章 か ら 構 成 さ れ て いま す 。 


《 第 1 章 構造 化 さ れ た 言語 体系 ) 
QuickBASIC の 特徴 で ある "構造 化 さ れ た 言語 体系 」 に つい て 要約 
し て あり ます 。 


《 第 2 章 言語 仕様 
Quick BASIC の プロ グラ ム を 書く 上 で の 約束 事 、 定 数 と 変数 、 式 
と 演算 子 、 構 造 化 な ど に つい て 書い て あり ます 。 


《 第 3 章 ステ ー ト メン ト )〉 
すべ て の ステ ー ト メン ト を アル ファ ベッ ト 順 に まとめ て あり ます 。 


《 第 4 章 関数 
すべ て の 関数 を アル ファ ベッ ト 順 に まとめ て あり ます 。 


《 第 5 章 メタ ・ コ マン ド ) 
すべ て の メタ ・ コ マン ド を アル ファ ベッ ト 順 に まとめ て あり ます 。 


付録) 
1 ASOII コー ド 
6 キー・ ス キャ ン ・ コ ロー ド 
すず 9 エラ ーー メッ ゼー ジ 
4 機能 別 ス テー トメ ント ・ 関 数 索引 
5 Ver.4.5 で 追加 され た ステ ー ト メン ト お よび 関数 


この 本 の 構成 一 一 3 


ーー ea テーーー ヤ ーー ニー 


この 本 の 利用 の 仕方 


症 生ま OOO5O5O5O5O5O 


邊 必要 な と き に すぐ 引け る ! 

この ハン ディ ・ シ リー ズ の 本 は 、 一 度 読ん で 終わ り に する 本 で な く 、 
パソ コン や 読者 の そば に 置い て お いて 、 必 要 な と き に サッ ! と 、 開 
いて 使え る よう に 工夫 され て いま す 。 し た が っ て 、 こ の 本 の 各 章 は 、 
完全 に 独立 し た テー マ に つい て 書い て あり ます の で 、 開 いた と ころ だ 
け を 読ん で も 理解 で きる よう に な っ て いま す 。 


邊 初心 者 の 人 は .. . 

も し 読者 が QuickBASIC に つい て は 、 全 く の ビ ギ ナ ー で ある な ら 
ば 、『Quick BASIC ハン ドブ ッ ク Vol.1 基本 操作 ] と 「Quick BASIC 
ハン ド プ ブッ ク Vol.2 リフ ァ レ ンス 」 の 両方 を 、 ひ と と お り 眼 を 通さ れ 
る こと を お すす めし ます 。 


再 パ ワー・ プ ログ ラマ ー の 人 は ... 

また 、 も し 読者 が BASIC や 他 の 言語 で プロ グラ ミン グ し た こと が 
ある パワ ー・ プ ログ ラマ ー で ある な ら ば 、 本 書 を 重点 的 に 読ま れる こ 
と を お すす めし ます 。 

さら に 、 プ ログ ラミ ング 中 に ステ ー ト メン ト や 関数 な どの 書式 や 意 
味 に つい て 不明 な 点 が で て きた ら 本 書 の 第 3 章 か ら 第 5 章 の 解説 を 読 
ん で くだ さい 。 

また 、QuickBASIC の 統合 環境 下 で 使っ て いて 画面 や キー 操作 に つ 
いて 迷っ た ら 「QuickBASIC ハン ドブ ッ ク Vol.1 基本 操作 ] の 該当 
ペー ジ を 開い て 読ん で くだ さい 。 


4 一 一 この 本 の 利用 の 仕方 
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第 1 草 | 


構造 化 さ れ た 言語 





回 た: 訓 和 T@IUITe4E7tS1【L3 
"言語 体系 の 構造 化 " の 観点 か ら 説 明 し ます 


| 


構造 化 さ れ た 言語 体系 


マイ クロ ソフ ト 社 の 「Quick BASIC」 は 、 い まま で に な い 新 し い タ イ 
プ の BASIC で す 。 これ まで BASIC と いえ ば 、 パ ソコ ン の ビギナー が 遊 
び 半 分 で きわ る 言語 と か 、 素 人 が 使う 言語 と か 、 満 足 の いく シス テム を 
開発 で き な い 言 語 と か 言わ れ て きま し た 。 残念 な が ら 正 直 な と ころ 、 イ 
メー ジ が あま り 良 く な いよ う で し た 。 

この 本 で 取り 上 げ て いる Quick BASIC は 、 い ま 人 気 の あ る C 言 語 や 
PASCAL と 比較 し て も まっ た く 層 色 が あり ませ ん 。 むし ろ 、 ひ と つの 開 
発言 語 し し て と ら え た な ら ば 優れ て いる と ころ が た くさ ん あり ます 。 
Quick BASIC は 、 プ ログ ラム を 開発 する の に 必要 な ステ ー ト メン ト や 関 
数 を 十分 な ほど 豊富 に 提供 し て くれ て いま す 。 

以下 、 こ の 章 で は 、Quick BASIC の 二 大 特徴 の うち の 


構造 化 さ れ た 言語 体系 


に つい て 説明 し ます 。 

「 統 合 化 され た 開発 環境 」 に つい て は 、『Quick BASIC ハン ドブ ッ ク 
Vol.1 基本 操作 】 を お 読み くだ さい 。 

Quick BASIC の プロ グラ ミン グ に お いて 、 構 造 化 で きる も の に は 、 次 
の 4 つが あり ます 。 


P プロ グラ ム 

プロ グラ ム を 構成 する モジ ュー ル や プロ シー ジャ を 使っ て 階層 的 で 独 
立 化 し た プ ブロック ・ ル ー チ ン を つく る こ と が で きま す 。 
フロ ー 

プロ グラ ム の 複雑 な 流れ を 論理 的 に 構造 化し て 明確 に で きる よう に な 
り ま し た 。 


了 ー タ 

デー タ の タイ プ を ユー ザー が 定義 で き 、 ま た 構造 的 に デー タ ・ タ イプ 
を 定義 する こと に より 複雑 な し コード ・ タ イプ の デー タ を ハン ドリ ング 
で 富 訪 志 所 な りり まし だ 。 

p スコ ー プ 

変数 の 有効 科 囲 を 特定 の モジ ュー ル ・ レ ベル ・ コ ー ド また は プロ シー 
ジャ 内 だ け で 有効 な ロー カル 変数 と それ ら に 共通 し て 有効 な グロ ー バ ル 
変数 の どちら に で も 宣言 で きま す 。 


プロ グラ ム の 構造 化 


Quick BASIC で は 、 プ ログ ラム を 構成 する サブ ・ レ ベル の ブロ ッ ク と 
し て 、「 モ ジュ ー ル 」 と 「 プ ロ シ ー ジ ャ 」 が 用 意 さ れ て いま す 。 


モジ ュー ル 化 

ソー ス ・ プ ログ ラム を 大 き な 1 つ の ファ イル に し て し まう の で は な く 、 
より 細か く プ レー クダ ウン し た 部 分 に 分 割 で きる こと に より 、 管 理 し や 
すく な り ます 。 

P SUB プロ シー ジャ の サポ ー ト 

モジ ュー ル の 中 に どこ か ら で も 呼び だ し て (コー ル し て ) 使え る SUB 
プロ シー ジャ を 作る こと が で きま す 。QuickBASIC の ステ ー ト メン ト を 標 
進 と し て 組み 込ま れ て いる ステ ー ト メン ト と する な ら ば 、 こ の SUB プ 
ロ シ ー ジ ャ は 、 ユ ー ザ ー 自 身 が 定義 で きる ステ ー ト メン ト と いう こと に 
な の ます 。 

FUNCTION プロ シー ジャ の サポ ー ト 

式 の 中 で 使え る FUNCTION プ ロ シ ー ジ ャ を 作る こと が で きま す 。 
QuickBASIC の 関数 を 標準 と し て 組み 込ま れ て いる 関数 と する な ら ば 、 
この FUNCTION プロシージャ は 、 ユ ー ザ ー 自 身 が 定義 で きる 関数 と い 
うと と ち 代 な がり ま す 。 
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。 他 言語 の モジ ュー ル の コー ル 
必要 な ら ば 、C 言語 ・PASCAL・FORTRAN・ ア セン ブラ で 開発 し た 
関数 や 手続 き を 呼び だ し て 使え ます 。 


より 詳し く は 、「 2・4 プロ グラ ム の 構造 化 」 を 参照 し て くだ さい 。 


フロ ー の 構造 化 
ma 
Quick BASIC で は 、 順次 処理 、 分 岐 処理 、 お よび 反復 処理 を 使っ て 構 
造 化 プ ログ ラミ ング で きる よう に 、 フ ロー を 制御 する た め の ス テー トメ 
ント が 用 意 さ れ て いま す 。 


。 行 番号 な し の 順次 処理 

プロ グラ ム は 、 流 れ を 変え な いか ぎり 、 プ ログ ラム の 上 か ら 下 へ 順次 
実行 され ます 。 
ドブ ロック IF に よる 複数 行 化し た 多重 分 岐 処理 

IF.…THEN..…ELSE に よる 分 岐 で 、 真 偽 ど ちら の 場合 で も 複数 の ステ 
ー ト メン ト を 書け る の で 、 構 造 化 プ ログ ラミ ング を 行ない や すい 。 ま た 
ELSEIF も ある の で 多重 に 分 岐 し た 処理 を 行 な を ます 。 
ド SELECT CASE に よる 多重 分 岐 処理 

複雑 な 分 岐 条 件 を 処理 で きる よう に SELECT CASE ス テー トメ ン 
ト が 用 意 き れ て いま す 。 
DO LOOP に よる 反復 処理 

前 処理 も 後 処理 も で きる DO..LOOP ステ ー ト メン ト が 用 意 さ れ て い 
る 。 も ちろ ん 、FOR...NEXT や WHILE.…WEND も 使え ます 。 


ょ り 詳 し く は 、「 2 ・ 3 フロ ー の 構造 化 」 を 参照 し て くだ さい 。 


1 ( P 0) 
デー タ の 構造 l ie 


Quick BASIC で は 、 複 数 の デー タ を 1 つの まとまっ た デー タ と し て 取 
り 扱 える よう に する 目的 で 、 配 列 変数 と ユー ザー 定義 変数 が 使え ます 。 


範囲 指定 で きる 配列 変数 

同一 タイ プ の 複数 の 変数 を まとめ て 処理 する た め の 変 数 と し て 配列 変 
数 が 使え ます 。 単 純 変数 お よび ユー ザー 定義 型 変数 の 配列 を つく る こと 
が で きま す 。 

また 、 配 列 の 添字 の 下限 と 上 限 を 自由 に 設定 で きる の で 、 現 実 の 世界 
に あっ た デー タ 処 理 を 行なえ ます 。 

。 ユー ザー 定義 型 変数 

異な っ た 複数 の タイ プ の 変数 を 1 つ に まとめ て 処理 する た め の 変 数 と 
し て ユー ザー 定義 型 変 数 が 使え を ます 。 こ の 変数 は 、 レ コー ド 変 数 と も い 
いま す 。 基本 と な る デー タ ・ タ イプ は 、 文 字 列 型 と 数 値 型 の 2 つ し か な い 
が 、 こ れ ら 2 タイ プ を 使っ て 定義 し た りす れ ば 、 様 々 な 型 を 定義 で きま 
すず 

また 、 ユ ー ザ ー 定 義 型 の 中 で 他 の ユー ザー 定義 型 も 使え る の で 、 構 千 
的 に デー タ ・ タ イプ を 定義 むす る こと に より 複雑 な レコ ー ド ・ デ ー タ の 型 
を 定義 で きま す 。 


より 詳し く は 、「 2 ・2 デー タ の 構造 化 」 を 参照 し て くだ さい 。 
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0 


スコ ー プ の 構造 化 


変数 は 、 そ の 有効 範 界 を ロー カル な も の ある い は グロ ー バ ル な も の と 
し で 宣言 で きま す 。 


ロー カル 変数 

特定 の モジ ュー ル ・ レ ベル ・ コ ー ド また は プロ シー ジャ 内 だ け で 有効 
な 変数 と し て ロー カル 変数 を 宣言 で きま す 。 

を グロ ー バ ル 変 数 

モジ ュー ル ・ レ ベル ・ コ ー ド また は プロ シー ジャ 内 に 共通 し て 有効 な 
変数 と し て グロ ー バ ル 変 数 を 宣言 で きま す 。 


その 他 の 特徴 


その 他 に も 、 言 語 仕様 上 ト 、 サ ポー ト さ れ て いる 数 多く の 特徴 が あり ま 
す 。 


イン クル ー ド ・ フ ァイル 

ソー ス ・ フ ァイル の 一 部 と し て 、 ソ ー ス ・ モ ジュ ー ル か ら 独 立 し た イ 
ンク ルー ド ・ フ ァイル が 使え る よう に な っ て いま す 。 
メタ ・ コ マン ド 

ステ ー ト メン ト お よび 関数 以外 に 、 プ ログ ラム の 取り 扱い 方 や 配列 の 
記憶 領域 を 指示 する た め の 命令 た し て メタ ・ コ マン ド が あり ます 。 
『 変数 の 有効 範囲 の 宣言 

モジ ュー ル 間 、 モ ジュ ー ル と プロ シー ジャ 間 で の 変数 の 有効 範囲 を 、 
グロ ー バ ル に も ロー カル に も 宣言 で きま す 。 


『 固定 長文 字 列 変数 

文字 列 の タイ プ と し て 、 最 大 32767 文 字 ま で の 固定 長文 字 列 を 宣言 で き 
まま が 。 
『 長 整数 型 数 値 

より 桁 数 の 多い 整数 を 取り 扱え る よう に 、 長 整数 型 数 値 (long inte 
ger) が サポ ー ト され て いま す 。 
ド IEEE フォーマット 

浮動 小数 点 (実数 ) は 、 特 に 指示 し な い 限 り 、MBF より さら に 精度 の 
高い IEEE フォ ー マ ッ ト で 内 部 的 に 処理 され ます 。 
を バイ ナリ ー・ フ ァイル 

シー ケン シャ ル ・ フ ァイル や ラン ダム アク セス ・ フ ァイル の 他 に 、 バ 
イナ リー・ フ ァイル の 読み 書き が 自由 に で きま す 。 
『 再帰 (recursion) 

SUB プロ シー ジャ や FUNCTION プロ シー ジャ を 再帰 的 に 呼び だ し 
て 使え ます 。 
コマ ンド ・ ラ イン の 引数 

コマ ンド の 引数 を 、 統 合 環境 下 で の 実行 時 で も コマ ンド ・ ラ イン で の 
実行 時 で も 取り 込め ます 。 
『 日 本 語 処理 

半角 ・ 全 角 の 混在 し た 文字 列 を 処理 する た め に ステ ー ト メン ト や 関数 
が 日 本 語 バ ー ジ ョ ン で は た くさ ん 追加 され て いま す 。 
p グラ フィ ッ ク 

カラ ー、 ピ クセ ル 、 描 画 、 座 標 処理 な ど グ ラフ ィ ッ ク に 必要 な も の は 
すべ て サポ ー ト し て いま す 。 
割り 込み 

イベ ント ・ ト ラッ プ や DOS の シス テム ・ コ ー ル を 簡単 に 行なえ を る よう 
に な っ て いま す 。 
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この 章 で は 、QuickBASIC が プロ グラ ム 言 語 と し て 持っ て いる その 仕様 を 、 
49E バ と を アニー シン ム こさ ノミ に 
た さ の アル ュ レル レジ (9 た: 5 の の まこ も: 時 を 





2・1 


ソース イプ グラ ム 


4 


ステ ー ト メン ト と 関数 と メタ ・ コ マン ド 


Quick BASIC で は 、 コ ンピュータ に 対す る 命令 は 、「 ス テー トメ ント 
(statement)」「 関 数 (function)」「 メ タ ・ コ マン ド (meta -command)」 を 使 
っ て 行なわ れ ま す 。 


時 ステ ー ト メン ト 

ステ ー ト メン ト と は 、 そ れ 自 体 独立 し た 機能 を 持つ 命令 の こと を いい 
ます 。 た と えば 、OPEN、INPUT、PRINT な ど が ステ ー ト メン ト で 
す 。 全 ステ ー ト メン ト に つい て は 、 第 3 章 で まとめ て あり ます 。 


盾 関数 

関数 は 、 0 個 以上 の 引き 数 を 渡す と ある 値 を 返し て くれ る 機能 を 持っ 
て いま す 。 関数 は 、 命 令 を の も の で は あり ませ ん が 、 ス テー トメ ント 文 
の 中 で 使い ます 。 た と えば 、 EOF() 、 LEFT$ () な ど が 関数 で す 。 全 関 数 
に つい て は 、 第 4 章 で まとめ て あり ます 。 


四 メ タ ・ コ マン ド 

この 命令 は 、 プ ログ ラム の 実行 上 L、 ソ ー ス ・ フ ァイル や 変数 の 取り 扱 
い 方 に つい て Quick BASIC に 指示 る た め に あり ます 。 全 部 の メタ ・ 
コマ ンド に つい て は 、 第 5 章 で まとめ て あり ます 。 


ステ ー ト メン ト 文 と 行 


瑞 ス テー トメ ント 文 
1 つの 命令 を 実行 する た め に 、 ス テー トメ ント と これ に 続け て 必要 な 
デー タ ・ 引 数 ・ ス イッ チ な ど を 書い た 文 を ステ ー ト メン ト 文 と いい ます 。 
だ と えば 、 


OPEN "BOOKS.DAT” FOR INPUT 





DO UNTIL EOF(1) 


LOOP 





で は 、 OPEN・DO・LOOP な ど が ステ ー ト メン ト で あり 、 こ れ ら の 
各 文 が ステ チー トメ ント 文 で す 。 ま た 、 EOF() が ファ イル の 終わ りか ど 
うか を 調べ る 関数 で す 。 


時 行 
ド 1 行 に 書け る 文字 数 

1 行 に 書け る 文字 数 は 、256 文 字 で す 。 

を マルチ ・ ス テー トメ ント 行 

ステ ー ト メン ト 文 は 、 1 行 に 1 つの ステ ー ト メン ト 文 ずつ 書き ます が 、 
ステ ー ト メン ト 文 を " : (コロ ン ) "で 区 切っ て 1 行 に 2 つ 以 上 の ステ ー ト 
メン ト 文 を 書く こと が で きま す 。 こ の よう に 2 つ 以 上 の ステ ー ト メン ト 
文 を 書い た 行 を 「 マ ル チ ・ ス テー トメ ント 行 」 と いい ます 。 

た と えば 、 


LOCATE 10, 5:COLOR 3 : PRINT "Quick BASIC” 


の よう に も 書け ます 。 特 に 必要 が な いか ぎり 、1 行 に 1 つの ステ ー ト メ 
ント 文 を 書い た 方 が 慣れ て くる と 見 や すい よう で す 。 
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ビ 


『 行 番号 
伝統 的 な BASIC で は 、 各行 に は 「 行 番号 」 が 必ず あり まし た 。 し か 
し 、 Quick BASIC で は 、 付け て も 付け な く て も 、 ど ちら で も ステ ー ト メ 
ント を 実行 で きま す 。 行 番号 を 付け られ る よう に な っ て いる の は 、 今 ま 
で の BASIC と の 互換 性 の た めで あっ て 、「 構 造 化 プロ グラ ミン グ 」 の 観 
点 か ら す れ ば 必要 あり ませ ん 。 も し 付け る と き は 、 

0 一 65529 まで の 整数 
を 使っ て 、 キ ー ボ ー ド か ら プ ログ ラマ ー 自 身 が 入力 し て 付け ます 。 
j) 行 ラ ベル 
特定 の 行 に 名 前 (「 行 ラベ ペル 」) を 付け る こと も で きま す 。 行 ラベ ル は 、 
40 文 字 以 内 で 付け 、 最 初 の 1 文字 は アル ファ ベッ ト で な けれ ば な ら ず 、 そ 
の 最後 に : (コロ ン ) を 付け な けれ ば な り ま せん 。 た だ し 、 大 文字 と 小 
文字 の 区 別 は あり ませ ん 。 た と えば 、 


DrawMainMenu : 


の よう に 付け ます 。 


コメ ント 


ソー ス ・ フ ァイル の 中 に コメ ント (注釈 ) を 書き ます 。 
コメ ント を 書く に は 、2 つ の 方 法 が あり ます 。 


ョ HEM ステ ー ト メン ト を 使っ て コメ ント を 書く 方 法 
1 つの ステ ー ト メン ト と し て 書き ます 。 





| REM プロ グラ ム 名 - MAILING.BAS 
REM 改訂 日 - 1989.05.31 | 


OPEN "LETTER.DAT” FOR RANDOM AS 1: ファ イル ・ オ ー プ ン 
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記号 に 続け て コメ ント を 書く 方 法 
ッ ・ り で 区 切ら な く て も ステ ー ト メン ト の 右 に 書け ます 。 








・ プロ グラ ム 名 - MAILING.BAS へ 
・ 改訂 日 - 1989.05.31 
OPEN LETTERDAT' FOR RANDOM AS 1 ファ イル ・ オ ー プ ン 
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2・2 


gB 


ー タ の 構造 化 


デ 


『 デー タ : 文字 列 型 と 数 値 型 1 


Quick BASIC で 取り 扱え を る デー タ の タイ プ は 、 基本 的 に は 、「 文 字 列 
(string) 型 」 と 「 数 値 (numeric) 型 」 だ け で す 。 論理 型 も 日 付 型 も 金額 刑 も 
あり ませ ん 。 し か し 、 プ ログ ラマ ー は 、 文 字 列 型 と 数 値 型 を 組み 合わ せ 
て 、 独 自 の デー タ ・ タ イプ を プロ グラ マー 自身 が 定義 で きる よう に な っ 
て いま す 。 


時 文字 列 弄 

文字 列 型 の デー タ は 、 0 文字 以上 の 長 さ を 持つ 文字 で す 。 1 つの 文字 
列 の 長き は 、 0 一 32,767 文字 まで 取り 扱え ます 。 文字 長 が 0 の 文字 列 を ヌ 
ル (null) と いい 、ASCIT コー ド の chr$(0) と 同じ で す 。 

文字 列 型 の デー タ に は 、「 可 変 長文 字 列 」 と 「 固 定 長文 字 列 」 の 2 種類 
が あり ます 。 


@ 文 字 列 型 デー タ の 種類 


















OO 二 
可変 長文 字 列 文字 の 長 さ が 一 定 で な い 文字 列 | "Quick BASIC" 
variable- length | で す 。 "構造 化 " 













string 


固定 長文 字 列 
fixed-length string 





文字 の 長 さ を 必要 な だ け 前 も っ 
て 宣言 し た 文字 列 で す 。 

その 長 さ より も 短い 文字 列 を 代 
入 し た いと き は 、 残 り の 部 分 が 
空白 に な り ま す 。 


"Quick 
?QB し 








上 数 値 型 
数 値 型 の データ に は 、「 整 数 」・「 長 整数 」・「 単 精度 型 実数 」・' 倍 精度 弄 


実数 」 の 4 種類 あり 、 そ れ ぞ れ 異 な っ た 範囲 の 数 値 を 扱え ます 。 
Quick BASIC で は 実数 を MBF で は な < IEEE フォー マッ ト て で 処理 


し ます 。 
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@ 数 値 型 デー タ の 種類 







種類 と バイ ト 数 









-32768 一 十 32767 (10 進 ) 
&O0 一 &O177777 ( 8 進 ) 
&H0 一 &HFFFF (16 進 ) 


整数 
INTEGER 






&O177 
&H8AC0 






2 バイ ト 


長 整数 
LONG integer 














-2147483648-- 十 2147483647(10 進 ) 
&O0  &O37777777777 ( 8 進 ) 
&H0 - &HFFFFFFFF(16 進 ) 


150069 
&O25550 
&H4A71DC 






4 バイト 


単 精度 型 実 数 
SINGLE precision 
floating point 
4 バイ ト 


倍 精度 型 実数 
DOUBLE precision 
floating point 
8 バイ ト 













-3.402823E 十 38 一 -1.175494E-38 
填 1.175494E-38 一 十 3.402823E 十 38 


3.14159 















-1.797693134862316D 十 308 一 
-2.225073858507201D-308 

填 2.225073858507201D-308 - 

填 1.797693134862316D 十 308 


0.3775049 









定数 と 変数 


プロ グラ ム の 中 で デー タ は 、「 定 数 (constant)」 ま た は 「 変 数 (variable) 」 
に し て 取り 扱い ます 。 


上 定数 


定数 と は 、 プ ログ ラム の 実行 中 変化 する こと の な い デ ー タ で す 。 こ れ 
に は 、「 リ テラ ル 定 数 」 と 「 シ ン ボ リッ ク 定 数 」 の 2 種類 が あり ます 。 
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@ 定 数 の 種類 


リテラ ル 定 数 
literal constant 
デー タ そ の も の を いう 


で 囲ま な けれ ば な ら 

な い 。 

?Quick BASIC" 
"構造 化 " 
ASCII コー ド お よび 
漢字 連続 コー ド は 、 数 
字 で 表わす こと が で き 
る 。 

CHR$(65) 
CHR$(257) 

JJIS コー ド は 、 先頭 
に &J を 付け る 。 
CHRS$(&J2122) 
句点 コー ド は 、 先 頭 
に &K を 付け る 。 
CHRS$(&KO102) 


整数 (10 進 表 現 ) は 符 
号 以外 何 も 付 け な い 
12345 
-258 
整数 (8 進 表現 ) は 、 
先頭 に &O を 付け る 。 
&O1 フ 7 フ 7 
整数 (16 進 表現 ) は 先 
頭 に &H を 付け る 。 
&H1A 
長 整数 (10 進 表現 ) 
は 、 符 号 以外 何 も 付 け 
な い 。 
53421018 フ 7 
-84900000 
: 長 整数 (8 進 表 現 ) 先 
頭 に &O を 付け る 。 
&O1 フ 77 
) 長 整数 (16 進 表現 ) 
先頭 に &H を 付け る 。 
&H1A 
| 単 精度 型 実 数 は 、 指 数 
| 
5.12733E 十 12 


間 倍 精 度 型 実 数 は 、 指 数 
形式 と し て D で 表 わ 
す 


2.01234567890123D-03 


CONST start = 1 
CONST max = 10O 





シン ボリ ッ ク 定 数 
(記号 定数 ) H 
symbolic constant 定 | PRINT title$ 
数 に 名 前 を 付け て 、 あ 
と は その 名 前 を 使う 


CONST title$ = "Quick" 


FOR i = start TO max 


NEXT i 
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変数 
変数 と は 、 プ ログ ラム の 実行 中 に 自由 に 変え ん る こと の で きる デー タ で 
す 。 


『 変数 名 
変数 の 名 前 を 「 変 数 名 」 と いい ます 。 この 変数 名 に つい て 、 つ ぎの よ 
うな ルー ル が あり ます 。 
便 ア ルフ ァ ベ ッ ト 文 字 ・ 数 字 ・ ピ リオ ド を 使っ て 付け る 。 
答 最 大 40 文 字 以 内 で 付け る 。 
仁 アル ファ ベッ ト 文 字 で 始ま る 。 
島 ア ルフ ァ ベ ッ ト 文 字 の 大 文字 と 小文字 の 区 別 は な い 。 
休 予 約 語 は 使え な い 。 
型 宣 言 
変数 名 が どの タイ プ の デー タ を 取り 扱う か は 、 そ の 型 を 宣言 する こと 
に より 決ま り ま す 。 そ の 型 宣 言 の 仕方 と し て 3 つ あ り ま す 。 


@ 変 数 の 種類 










最初 の 代入 時 また | 型 宣言 ステ ー ト メ 
は 使用 時 に 型 宣 言 | ント を 使う 。 
記号 を 変数 名 の 末 
尾 に 付け る 。 


付け な いと 単 精度 
型 と な る 。 

以後 その 記号 を 付 
け な け れ ば な ら な 
い 。 


※ COMMON 
※ DIM 

※ REDIM 

※ SHARED 
※ STATIC 

※ TYPE 

の ステ ー ト メン ト 
IO 









AS タイ プ 
に より 型 宣言 を 行 


な う 。 
以後 記号 は 、 付 け 
な い 。 


AS INTEGER 












DEFINT 






整数 year%6 = 1989 




















長 整数 amount& = 100000 DEFLNG AS LONG 

単 精度 型 実 数 | Pll = 3.14 DEFSNG AS SINGLE 
倍 精度 型 実 数 | P|# = 3.141598 DEFDBL AS DOUBLE 
可変 長文 字 列 | aName$ = "QB" | DEFSTR AS STRING 





固定 長文 字 列 AS STRING *n 





*n は 、 固 定 長文 字 列 の 長 さ を 指定 する 
*※ ユーザー 定義 型 の 宣言 に つい て は 後述 の 箇所 を 参照 の こ と 


これ ら の 可変 長文 字 列 型 変数 ・ 固 定 長文 字 列 型 変数 ・ 整 数 型 変数 ・ 長 
整数 型 変数 ・ 単 精度 型 変数 ・ 倍 精度 型 変数 を 総称 し て 「 上 単純 変数 」 と い 
いま す 。 
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構造 化し た 変数 : 配列 と ユー ザー 定義 弄 


Quick BASIC で は 、 複 数 の 単純 変数 と これ か ら 述 べ る ユー ザー 定義 弄 
変数 を 構造 化し た デー タ と し て 取り 扱う た め に 、「 配 列 変数 (array vari 
able)」 と 「 ユ ー ザ ー 定 義 型 変数 (user-defined type variable)」 の 2 つ 
が 使え る よう に な っ て いま す 。 


置 配列 変数 

配列 は 、" 同 一 タイ プ の 複数 の 変数 を まとめ て 処理 する "の に 適し て い 
ます 。 そ の た め の 変 数 を 配列 変数 と いい ます 。 単純 変 数 お よび ユー ザー 
定義 型 変数 の 配列 を つく る こと が で きま す 。 


『 形式 
配列 変数 は 、 つ ぎの 形式 に な っ て いま す 。 
配列 変数 名 (次 元 1 次 元 2, ...) 


配列 変数 名 は 、 配 列 全 体 に 付け た 名 前 で す 。 最 大 60 次 元 まで 確保 で き 
ます 。 
ぁ 要素 と 添字 

配列 を 構成 し て いる 1 つ 1 つの こと を 「 要 素 」 と いい 、 そ れ ら を 特定 
する た め の 番 号 を 「 添 字 」 と いい ます 。 

た と えば 、 整 数 型 の 1 次 元 配 列 の 宣言 


DIM month % (12) 


の よう に し た と き は 、 つ ぎの よう な イメ ー ジ で 考え れ ば よい で し ょ う 。 


配列 変数 
month% 


添字 1 訟 き 4 5 6 深き 9 10 字 骨 


5 番目 の 要素 は 、month%%(5) の よう に 表わし 、 そ の デー タ は 31 に な っ 
て いま す 。 
・ 下限 と 上 限 

添字 に は 、 下 限 と 上 限 が あり ます 。 特 に 指定 し な いと 下限 は 0 か 1 に 
な っ て いま す (OPTION BASE ス テー トメ ント で どちら か に 設定 で き 
ます )。 上 限 は 、 宣 言 し た と き の 数 字 が 上 限 の 添字 に な り ま す 。 

けれ ども 、 必 要 と する な ら ば 、 下 限 と 上 限 の 両方 を 指定 で きま す 。 た 
と えば 、 


DIM year (1980 TO 1985) 
I 1 
下限 上 限 


と し た と き は 、 6 要素 の 配列 を 宣言 し た こと に な り ま す 。 


時 ユ ー ザ ー 定 義 型 変数 

ユー ザー 定義 型 は 、" 異 な っ た 複数 の タイ プ の 変数 を 1 つ に まとめ て 処 
理 す る "の に 適し て いま す 。 ユー ザー 定義 型 変数 は 、 レ コー ド 変 数 と も い 
いま す 。 
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『 形式 
ュ ユー ザー 定義 型 変数 の 宣言 に 先だって 、TYPE ステ ー ト メン ト を 使っ 
て 最初 に その 型 宣 言 を し な けれ ば な り ま せん 。 


TYPE ユー ザー 定義 型 名 
要素 名 1 AS タイ プ 
要素 名 2 AS タイ プ 


要素 名 n AS タイ プ 
END TYPE 


ュー ザー 定義 型 名 は 、 そ の 型 全体 に 付け た 名 前 で す 。 ユー ザー 定義 弄 
の 宣言 に 含め る こと の で きる タイ プ は 、 固 定 長文 字 列 型 ・ 整 数 型 ・ 長 整 
数 型 ・ 単 精度 型 ・ 倍 精度 型 ・ テ ユー ザー 定義 型 で 、 可 変 長文 字 列 と 配列 を 
含め る こと は で きま せん 。 

次 に 、 そ の ユー ザー 定義 型 名 を 使っ て 実際 の ユー ザー 定義 型 変数 を 宣 
言 し ます 。 


DIM ユー ザー 定義 型 変数 名 AS ユー ザー 定義 型 名 


7 迷 如 類 ほ 、 

TYPE birthdayType 
year AS INTEGER 
month AS INTEGER 
day AS INTEGER 

END TYPE 

TYPE friendInfoType 
aName AS STRING * 14 
anAge AS INTEGER 
anAddr AS STRING * 20 
anPhone AS STRING * 12 
born AS birthdayType 

END TYPE 

DIM myFriend AS friendInfoType 


と し た 場合 、 次 の よう な イメ ー ジ で 考え れ ば よい で し ょ う 。 
14 バ イト 


明 有 昌明 昌明 剛 
に 2 バイ ト 
ーー ーー 上 20 バ イト 


12 バ イト 


myFriend.aName 







myFriend.anAge 
myFriend.anAddr 





myFriend.anPhone 


myFriend.born.year 2 バイ ト 
myFriend.born.month 計 2 バイ ト 
myFriend.Dorn.day. 2 バイ ト 


※ ユ ー ザ ー 定 義 型 変数 myFriend は 、 全部 で 54 バ イト の 大 き さ に な り ま す 。 実際 
に は 、 パッ ク さ れ て いま す 。 

※ ユ ー ザ ー 定 義 型 変数 の デー タ は 、 各 要素 別に 取り 扱う こと も で きま すし 、 ま 
た ユー ザー 定義 型 変数 名 を 指定 する だ け で 同一 タイ プ 間 で の 代入 ・ フ ァイル ア 
クセ ス ・ プ ロ シ ー ジ ャ へ の 引数 渡し な ど 様 々 な と ころ で 使え ます 。 
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式 と 演算 子 


デー タ の 操作 は 、「 式 」 で 行ない ます 。 式 と は 、 定 数 ・ 変 数 お よび 関数 
の 各々 、 も し く は それ ら を 演算 子 で つなげ た も の の こと を いい ます 。 
演算 子 に は 、 つ ぎの 4 種類 が あり ます 。 


同 算 術 演算 子 
算術 演算 子 と は 、 数 値 デ ー タ を 操作 する た め の 演 算 記 号 で す 。 


算術 演算 子 の 種類 


実数 除算 | 15.3/5.1 

整数 除算 | &HI1F2C \ &H100 

| 午 介 | &H1F2C MOD &H100 

前 CGNWanaPWaasl 
※ 上 か ら 下 へ 優先 順位 の 高い 順に な っ て いる 。 

※ た だ し 、() が 最 優先 で 使え る 。 












(ed 
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時 文字 列 演算 子 


文字 列 演算 子 と は 、 文 字 列 デー タ を 操作 する た め の 演 算 記号 で す 。 


@ 文 字 列 演 算 子 の 種類 





還 関 係 演算 子 


関係 演算 子 と は 、 同 じ タ イプ の デー タ を 比較 する た め の 演 算 記 号 で す 。 


真 の と き プ 1 に 其 9 


@ 関 係 演算 子 の 種類 









lce er 
ale<r 
Ir mer 
mm lesr 
革 le=・ 


※ 関 係 演算 の 結果 は 、 真 (-|) また は 偽 (0 ) に な る 。 





偽 の と き 0 に な り ま す 。 
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旧 諭 理 演算 子 
論理 演算 子 と は 、 複 数 の 関係 演算 の 論理 を 求め る た め の 演 算 記号 で す 。 


@ 諭 理 演算 子 の 種類 











male$ = "Y” : female$ = "N" 
NOT male$ = "N" 


male$ ="Y”: female$ = "Y”" 
male$ = "Y” AND female$ = "Y" 
male$ = "Y” : female$ = "N" 
male$ = "Y” OR female$ = "Y”" 
排他 的 論理 和 | male$ = "Y”: female$ = "N" 
male$ = "Y” XOR female$ = "Y”" 
male$ = "N” : female$ = "N" 
male$ = "Y” EQV female$ = "Y”" 


male$ = "Y” : female$ = "Y" 
male$ = "N" IMP female$ = "Y”" 





























論理 演算 の 結果 は 、 真 (-|) また は 偽 (0) に な る 。 
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2・3 


フロ ー の 構造 化 


構造 化 プ ログ ラミ ング の アル ゴリ ズム は 、 3 つの 基本 構造 を 組み 合わ 
せ て 構築 し ます 。 


正 順 次 構造 

Quick BASIC の プロ グラ ム は 、 行 番号 の 有無 に 関係 な が ペソ ー ス ・ フ 
ァイル の 上 の 行か ら 下 の 行 へ ステ ー ト メン ト を 実行 し ます 。 マ ル チ ・ ス 
テー トメ ント に な っ て いる 行 は 、 左 か ら 右 に 実行 し ます 。 





順番 に 実行 する 
※ 行 番号 を 書い て も そ 


の 大 小 に 関係 な く 、 上 
か ら 順 に 実行 する 
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時 分 岐 構造 
ある 条件 を 満た す 場合 だ け 、 択 一 的 に 実行 きき る た め に は 、 つ ぎの ス 
テー トメ ント を 使い ます 。 


分 岐 の 条件 を 異な っ た パラ メー ター を 使っ て 判断 し た いと き に 適し て 
いま す 。 


コー 


どれ か を 実行 させ る 








4@ 


SELECT CASE.…END SELECT 


分 岐 の 条件 を 同一 の パラ メー ター が 異な っ た 値 に な る と き に 判断 する 
の に 適し て いま す 。 


SELECT CASE 一 
CASE 


どれ か を 実行 させ る 





CASE ELSE 


END SELECT 
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邊 反復 構造 
ある 条件 を 満た し て いる あい だ 、 繰 り 返 し 同じ 部 分 を 実行 きせ る た め 
に は 、 つ ぎの ステ ー ト メン ト を 使い ます 。 





FOR..…NEXT 


特定 の 回 数 、 繰 り 返し 実行 する の に 適し て いま す 。 





一 繰り 返し 実行 する 











WHILE.…WEND | 





ある 条件 が 真 で ちる あい だ 、 繰 り 返し 実行 きせ る の に 適し て いま す 。 


一 繰り 返し 実行 する 
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ーーー 繰り 返し 実行 する 
(繰り 返し の 最初 に お 
いて テス ト す る ) 





ネー 繰り 返し 実行 する 
(繰り 返し の 最後 に 
お いて テス ト す る ) 


LOOP WHILE/UNTIL 
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他 に も 、 分 岐 す る た め の ス テー トメ ント と し て 、 


借 GOTO 

借 GOSUB 

筐 ON.…GOTO 
代 ON.GOSUB 


な ど が あり ます 。 
これ ら の ステ ー ト メン ト に つい て は 、「 第 3 章 ステ ー ト メン ト 」 に お 
ける 各々 の 解説 箇所 を 参照 し て くだ さい 。 


ノ ・4 


プロ グラ ム の 構造 化 


プロ グラ ム と モジ ュー ル 
ある 問題 を 解決 する た め に 開発 し た も の を 総称 し て 「 プ ログ ラム 」 と 
呼び ます 。 
圏 モジュール 
1 つ 以 上 の ステ ー ト メン ト 文 が 書い て ある も の を 「 モ ジュ ー ル 」 と い 
いま す 。 


プロ グラ ム は 、 必 ず 1 つ 以 上 の モジ ュー ル か ら 成 り ま す が 、 1 つ だ け 
の モジ ュー ル か ら な る プロ グラ ム を 「 シ ング ル ・ モ ジュ ー ル 」 の プロ グ 
ラム と いい 、2 つ 以 上 の モジ ュー ル か ら な る プロ グラ ム を 「 マ ルチア プル ・ 
モジ ュー ル 」 の プロ グラ ム と いい ます 。 

マル チ プ ル ・ モ ジュ ー ル の 中 の モジ ュー ル の うち 、 最 初 に 実行 され る 
も の を 「 メ イン ・ モ ジュ ー ル 」 と いい 、 こ ね れ 以外 を 「 サ ブ ・ モ ジュ ー ル 」 
と いい ます 。 
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サ プ ・ 
モジ ロー ルル 





一 モ ジュ ー ル ・ レ ベル ・ コ ー ド と プロ シー ジャ ・ レ ベル ・ コ ー ド 
各 モ ジュ ー ル は 、 複 数 の SUB プロ シー ジャ と FUNCTION プロ シー 
ジャ を も つこ と が で きま す 。 


SUB プロ シー ジャ 

プロ グラ ム 中 で プロ グラ マー 自身 が 作成 し た ステ ー ト メン ト と し て 使 
和 る 。 
FUNCTION プロ シー ジャ 

プロ グラ ム 中 で プロ グラ マー 自身 が 作成 し た 関数 と し て 使え る 。 


モジ ュー ル に お ける プロ シー ジャ 以外 の 基本 的 な 部 分 を 「 モ ジュ ー ル ・ 
レベ ル ・ コ ー ド 」 と いい ます 。 ま た 、 プ ロ シ ー ジ ャ の 部 分 を 「 プ ロ シ ー ジ 
ャ ・ レ ベル ・ コ ー ド 」 と いい ます 。 


モジ ュー ル 
モジ ュー ル ・ レ ベル ・ コ ー ド プロ シー ジャ ・ レ ベル ・ コ ー ド 


FUNCTION func1 


SUB sub1 
CALL sub1 


CALL Sub2 


三 func1 十 func2 


FUNCTION func2 
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ノ ・5 


スコ ー プ の 構造 化 
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スコ ー プ と は 、 変 数 の 有効 範囲 の こと を いい ます 。 個々 の 変数 の 有効 
範囲 は 、 宣 言 する こと に より 「 ロ ー カ ル 変 数 (local variable)」 ま た は 「 グ 
ロー バル 変数 (global variable)」 と し て 指定 で きま す 。 


テロ ー カ ル 変 数 

特定 の モジ ュー ル ・ レ ベル ・ コ ー ド また は プロ シー ジャ 内 だ け で 有効 
な 変数 と し て ロー カル 変数 を 宣言 で きる 。 

ド グロ ー バ ル 変 数 

モジ ュー ル ・ レ ベル ・ コ ー ド また は プロ シー ジャ 内 に 共通 し て 有効 な 変 
数 と し て グロ ー バ ル 変 数 を 宣言 で きる 。 


特に 宣言 し な いそ の 変数 は 、 そ れ を 最初 に 使用 し た モジ ュー ル ・ レ ベ 
ル ・ コ ー ド 内 、 あ る い は プロ シー ジャ 内 で の み 有 効 に な り ま す 。 し か し な 
が ら 、 複 数 の プロ ッ ク に 共通 し て 有効 で ある よう に し た り 、 あ る い は グ 
ロー バル 変数 と 同じ 名 前 の ロー カル 変数 を 使え を る を よう に する に は 、 つ ぎ 
の ステ ー ト メン ト を 使い 分 け ま す 。 





COMMON SHARED | A 
DIM SHARED 
REDIM SHARED 
SHARED 
STATIC 


モジ ュー ル ・ レ ベル ・ コ ー ド プロ シー ジャ ・ レ ベル ・ コ ー ド 


COMMON SHARED A | FUNCTION func6 
DIM SHARED D 


モジ ュー ル ・ レ ベル ・ コ ー ド プロ シー ジャ ・ レ ベル ・ コ ー ド 








複数 の モジ ュー ル ・ レ ベル ・ コ ー ド 間 で 
共通 に する (そこ に 含ま れる プロ シー ジ 
ャ に も 共通 ) 
モジ ュー ル ・ レ ベル ・ コ ー ド と その すべ 
て の プロ シー ジャ 間 で 共通 に する 

モジ ュー ル ・ レ ベル ・ コ ー ド と 特定 の プ 
ロ シ ー ジ ャ 間 だ け で 共通 に する 

グロ ー バ ル 変 数 と 同名 の ロー カル 変数 
を プロ シー ジャ 内 て 使う 






























モジ ュー ル 2 呂 


民 記 薄らい 一 


COMMON SHARED A | FUNCTION func1 
DIM SHARED B 


C=10 


モジ ュー ル 1 叶 






SUB sub1 
SHARED C 


SUB sub2 | 


FUNCTION func2 
STATIC B 
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EK だ 
と ウン 


この 章 で は 、QuickBASIC が 標準 と し て 提供 し て いる 
ステ ー ト メン ト の すべ て を アル ファ ベッ ト 順 に 説明 し ます 

ステ ー ト メン ト に つい て 機能 別に 知り た いと き は 、 

付録 の 「 機 能 別 ステ ー ト メン ト ・ 関 数 索引 」 を 利用 し て くだ さい 





この 章 の 読み 方 





この 章 で は 、GQuick BASIC(Ver.4.2) に お ける 全 ス テー トメ ント を ア 
ルフ ァ ベ ッ ト 順 に 要約 し ます 。 各 ステ ー ト メン ト は 、 以 下 の ス タイ ル で 
記述 し ます 。 


時 ステ ー ト メン ト 名 

機能 に つい て の 要約 が 記述 され て いま す 。 
_ 機能 

働き や 用 途 に つい て 記述 され て いま す 。 
肖 書 式 


完全 な シン タッ クス (構文 ) が 記述 され て いま す 。 
例 1 : FOR カウ ンタ ーj = 初期 値 TO 終了 値 [STEP 増分 ] 
NEXT [カウ ンタ ーi[, カウ ンタ ー」…]] 


例 2 :GOSUB  { 行 番号 | 行 ラ ベル } 


『 書式 中 の 記号 の 記述 と 意味 















2 





その まま 書く べき 箇所 FOR, =, TO 


STEP, NEXT 







適当 な も の に 置き 換え | 日 本 語 の 部 分 カウ ンタ ー」 
て 大 く べき 和 所 初期 値 。 終 了 値 増分 
省略 可能 な 箇所 。 | [ ] ”~" | [sTEP 増 人 





どれ か 1 つ を 選ぶ べき 
箇所 
反復 的 に 使え る 箇所 
省略 され て いる 箇所 


上 引数 と オブ ション 
引数 お よび オプ ショ ン の 機能 や 意味 に つい て 記述 され て いま す 。 
旧 文 例 
実際 の 文例 を 掲げ て あり ます 。 
財 ノ ー ト 
パラ メー ター や オプ ショ ン に つい て の 補足 的 な 説明 や 使用 する と き の 
注意 点 に つい て 記述 され て いま す 。 
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BEEP 
ビー ブ 音 


_ 機能 
ビー プ 音 を 出す 
目 書式 


時 引数 と オプ ショ ン 
な し 
同文 例 


FOR i = 1 TO 3 し 導 Ww 相 アビ ウー も 3 回 内 ら す 
BEEP 


RGO 琶 = き /⑳50 ) ダミ ー・ ル ー プ 
NEXT j 
NEXT i 





弄 ノ ー ト 

> BEEP ス テー トメ ント は 、 
PRINT CHRS(7) 

と 同じ 機能 を 持っ て いる 


BLOAD 
メモ リー・ イ メー ジ ・ フ ァイル か ら の ロー ド 


_ 機能 
メモ リー・ イ メー ジ ・ フ ァイル の 内 容 を 指定 し た メモ リー に ロー ド す る 
邊 書式 


BLOAD ファ イル 名 [, オフ セッ ト 値 ] 


邊 引数 と オプ ショ ン 





に EL: 2c レ アン レン 
ファ イル 名 








読み 込み た い メ モリ ー・ イ メー ジ ・ フ ァイル の 名 前 を 文 
字 式 で 指定 する 。 

入力 デバ イス と し て の "COMn : "も 使え る 。 
読み 込み た い メ モリ ー の 先頭 アド レス の オフ セッ ト を 数 
値 式 で 指定 する 。 省 略す る と 、 保 存 し た と き の ア ドレ ス 
に な る 。 










邊 文例 





BLOAD "CatImage.Mem" | 





圏 ノー ト 
ぁ p 書き 出す に は 、BSAVE ステ ー ト メン ト を 使う 。 
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BSAVE 
メモ リー・ イ メー ジ ・ フ ァイル へ の セー ブ 


_ 機能 

メモ リー 内 容 を ディ スク 上 に メモ リー・ イ メー ジ ・ フ ァイル と し て セー ブ す 
る 
邊 書式 


BSAVE ファ イル 名 , オフ セッ ト 値 , サイ ズ 


叫 引 数 











ファ イル 名 書き 出し た い メ モリ ー・ イ メー ジ ・ フ ァイル の 名 前 を 文 


字 式 で 指定 する 。 
書き 出し た い メ モリ ー の 先頭 アド レス の オフ セッ ト を 数 
値 式 で 指定 する 。 
書き 出し た い メ モリ ー の 大 き さ の バイ ト 数 を 数 値 式 で 指 
定 する 。 














上 文例 





BSAVE "Cat1Image.Mem" 





圏 ノー ト 
読み 込む に は 、BLOAD ステ ー ト メン ト を 使う 。 
サイ ズ は 、0 65535 の 範囲 で 指定 し な けれ ば な ら な い 。 
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CALLG。。 BASIC] 


SUB プロ シー ジャ の 呼び 出し 
目 機能 
任意 の SUB プロ シー ジャ を 呼び 出す (コー ル す る ) 
邊 書式 


CALL プロ シー ジャ 名 [( 引 数 リス ト )] 


時 引数 と オプ ショ ン 






EE: ヒル スン レス 
呼び 出し た い SUB プロ シー ジャ の 名 前 を 文字 式 で 指定 
する 。 
その SUB プロ シー ジャ に 渡し た い 引 数 の リス ト を "() 
の 中 に 指定 する 。 







引数 リス ト 





邊 文例 ① 


productCode$ = "QB42" 
isStatus% = 0 
CALL FindOneRecord(productCode$ , isStatuS% ) 


の ss - ii 


DECLARE SUB FindOneRecord (aCode$, aResponse% ) 


| * 

| productCode$ = "QB42" 

| isStatus% = 0 

| FindOneRecord productCode$, isStatus% 
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目 文 例 ③ 


fileNumber% = 3 
ProductCode$ = "QB42" ェ ーー( で 囲ん で 式 と し て 渡す 


isStatus% = 0 
CALL FindOneRecord( (fi1leNumber% ) , productCode$, isStatus% ) 





邊 文例 の 


DIM salesOfMonth (1 TO 12) 


productCode$ = "QB42" 
isStatus% = 0 
CALL FindOneRecord(productCode$, salesOfMonth( ) , isStatus% ) 





田 ノ ー ト 

"CALL" の 部 分 は 、DECLARE ステ ー ト メン ト を 使っ て その SUB プロ シー 
ジャ を 宣言 すれ ば 省略 で きる (文例 ②) 。 

『 引数 は 、 参照 渡し (call by reference) さ れる の で 、 プ ロ シ ー ジ ャ 内 で の 書換 
え が 可 能 で ある 。 

ド 引数 を 、 値 に よる 渡し (call by value) に し た いと き は 、 式 と し て 渡す こと に より 可能 
と な る の で 、 呼 び 出し 時 の 値 は 変更 され な い (文例 ③)。 

引数 リス ト の 中 で 配列 変数 を 渡す と き は 、 そ の 変数 名 に 続け て () の み を 付け 
る (文例 ④) 。 

『 参照 ステ ー ト メン ト : DECLARE、SUB 


CALL/CALLSraoam 


他 の シー ジャ の 呼び 出し 


目 機 能 
他 の 言語 で 書い た プロ シー ジャ を 呼び 出す 
目 書 式 


① CALL プロ シー ジャ 名 [( 引 数 リス ト )] 


② CALLS プロ シー ジャ 名 [( 引 数 リス ト )] 


時 引数 と オプ ショ ン 












IE: コレ ロア ルン P2 





呼び 出し た い プ ロ シ ー ジ ャ の 名 前 を 指定 する 。 


引数 が ある と き は 、() で 囲ん で 指定 する 。 

1 つの 引数 は 、 つ ぎの シン タッ クス に 従う 。 

[tBYVAL | SEGj] 引数 名 

BYVAL ... 指定 する と 値 に よる 渡し (pass by value) 
に な る の で 、 引 数 の 値 は 変更 され な い 。 

SEG  ... 引 数 の セグ メン ト 付 き far アド レス を 渡し 
た いと き に 指定 する 。 

BYVAL お よび SEG を 省略 する と near アド レス の 参照 

渡し (pass by reference) に な る 。 


引数 リス ト 


肖 文 例 


| 
| CALL BinaryvSearch(codeArray( ) , theCode ) | 
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目 ノ ー ト 

ま "CALL" の 部 分 は 、DECLARE ステ ー ト メン ト を 使っ て その SUB プロ シー 
ジャ を 宣言 すれ ば 省略 で きる 。 

『 参照 ステ ー ト メン ト : DECLARE 


6e 


CALL ABSOLUTE 
機械 語 で 書い た プロ シー ジャ の 呼び 出し 


機械 語 で 書い た プロ シー ジャ を コー ル す る 


CALL ABSOLUTE ([ 引 数 リス ト ,] オフ セッ ト ) 


過 引 数 と オプ ショ ン 





IE: コレ ロア ルン 2 レ 2 
引数 リス ト 










プロ シー ジャ に 渡す 引数 を 指定 する 。 
コー ド ・ セ グ メ ント に お ける プロ シー ジャ の オフ セッ ト 
を 指定 する 。 








CALL ABSOLUTE(VARPTR(DosCTRL( 1 ) ) ) 


一 ノー ト 

を イン クル ー ド ・ フ ァイル "QB.BI" で 宣言 され て いる の で 、 こ れ を イン クル ー ド 
し な けれ ば な ら な い 。 

を クイ ッ ク ・ ラ イブ ラリ ー"QB.QLB" に 含ま れ て いる の で 、Quick BASIC を 起 
動 す る と き に 、/L オプ ショ ン を 使っ て ライ ブラ リー を 指定 し て お か な けれ ば な 


ら な い 。 
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CALL INT86old/CALL INT86xold 
MS-DOS の シス テム ・ コ ー ル 
_ 機 能 
MS-DOS の シス テム ・ コ ー ル を 実行 する 


目 書 式 


①CALL INT86old(INT 番 号 , 配列 配列 oO) 


②CALL INT86xold(INT 番 号 , 配列 1, 配列 o) 





DOS へ の 割り 込み 番号 を 指定 する 。 
割り 込み 時 に レジ スタ に 設定 し た い 値 を 整数 型 配列 変数 


に 書く 。 
割り 込み 実行 後 の レ ジス タ の 値 が この 整数 型 配列 変数 に 
保持 され る 。 





貞 文 例 





7"$TNCLUDE: '!BTNYQB.BI'" 
DECLARE FUNCTTON GetDrive$ ( ) 


| PRTNT "Current Drive = " + GetDrive$ + “":" 
END) 


【 
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FUNCTION GetDrive$ 


DIM iRegs( 7 ) AS INTEGER, oRegs{ 7 ) AS INTEGER 
ax = 0 


iRegs(ax) = &H1900 


INT86o1d &H21, iRegs( ), oRegs( ) 


GetDrive$ = CHR$((oRegs(ax) AND &HEFF) + 65) 
END FUNCTTION 





國 ノ ー ト 

pp インクルード ・ フ ァイル "QB.BI" で 宣言 され て いる の で 、 こ の ファ イル を イン 
クル ー ド し な けれ ば な ら な い 。 

py INT86old お よび INT86xold は 、 ク イッ ク ・ ラ イブ ラリ ー"QB.QLB" に 含ま 
れ て いる の で 、Quick BASIC を 起動 する と き に 、/L オプ ショ ン を 使っ て ライ ブ 
ラリ ー を 指定 し て お か な けれ ば な ら な い 。 

Py セグ メン ト ・ レ ジス タ DS、ES を 使う シス テム ・ コ ー ル を 行なう に は 、INT86xold を 
使う 。 

p QB.BI に お いて DECLARE ステ ー ト メン ト を 使っ て 宣言 され て いる の で 、" 
CALL" を 省略 で きる 。 こ の と き の 引 数 は ( ) で 囲ま な い 。 
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CALL INTERRUPT/CALL INTERRUPTX 
MS-DDS の シス テム ・ コ ー ル 


_ 機能 
MS-DOS の シス テム ・ コ ー ル を 実行 する 
用 書式 


①CALL INTERRUPT (INT 番 号 , レジ スタ ij レジ スタ o) 


② CALL INTERRUPTX (INT 番 号 , レジ スタ ij レジ スタ o) 


叶 引 数 






DOS へ の 割り 込み 番号 を 指定 する 。 
割り 込み 時 に レジ スタ に 設定 し た い 値 を ユー ザー 定義 弄 
変数 (RegType また は RegTypeX) に 書く 。 
割り 込み 実行 後 の レ ジス タ の 値 が ユー ザー 定義 型 変数 
(RegType また は RegTypeX) に 保持 され る 。 












時 文例 





)$TNCLUDE: "BIN\QB.B1I'” 
DECLARE FUNCTTON GetDrive$ ( ) 


PRTNT "Current Drive = " + GetDrive$ + " 
END 
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FUNCTTION GetDrive$ 
DIM iRegs AS RegType, oRegs AS RegT 攻 3 
iRegs.ax = &H1900 
TNTERRUPT &H21, iRegs, oRegSs 
GetDrive$ = CHR$((oRegs.ax AND &HFF) + 65) 
END FUNCTTON 








弄 ノ ー ト 
、 に TYPE RegT 

RegType お よび RegTypeX は 、 イ ンク ル 4 "AS INTFGFR 
り ゅ で 宣言 bx S INTEGER 
ー ド ・ フ ァイル "QB.BI 7 9 ee 
で 、 こ の ファ イル を イン クル ー ド し な けれ ば dx S 1NTEGER 
bp S INTEGER 
な ら な い 。 si S TNTEGER 


- di TNTEGER 
INTERRUPT お よび INTERRUPTX は 、 flags AS INTEGER 
END TYPE 


クイ ッ ク ・ ラ イブ ラリ ー"QB.QLB" に 含ま れ 
て いる の で 、Quick BASIC を 起動 する と き | ss Nmeerm 





メ に に 1 bx 、 TNTEGER 
に 、/L オプ ショ ン を 使っ て ライ プラ リー を 指 ck TNTEGFR 
定 し て お か な けれ ば な ら な い 。 dx AS INTEGER 
5 y ] 5 。 bp ITNTEGER 

臣 セグ メン トレ ジス タ DS、 ES を 使う シス テ Si INTEGER 
SS di INTEGER 

ム ・ コ ー ル を 行なう に は 、 INTERRUPTX を flags TNTEGER 
2 ds INTEGER 
有 _。 es INTEGER 


y QB.BI に お いて DECLARE ステ ー ト メン END TYBE 
ト を 使っ て 宣言 され て いる の で 、"CALL" を 
省略 で きる 。 こ の と き の 引 数 は ( ) で 囲ま 
な い 。 
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CHAIN 
ブロ グラ ム の 実生 


_ 機能 
ディ スク 上 の プロ グラ ム を 実行 する 
邊 書式 


CHAIN プロ グラ ム 名 


目 引 数 











プロ グラ ム 名 実行 し た い プ ログ ラム 名 を 指定 する 。 拡 張子 を 省略 し て 、 
Quick BASIC の 環境 内 で この ステ ー ト メン ト を 実行 す 
る と ".BAS" と みな し 、 ま た 実行 可能 形式 の プロ グラ ム の 


中 で は 、".EXE" と みな す 。 


時 文例 








Ke "WordPlus" 


ノ ー ト 

pp この ステ ー ト メン ト は 、 オ ー プ ン 中 の デー タ ・ フ ァイル を クロ ー ズ し た り 、 
メモ リー 上 の デー タ を クリ ア し た り し な い 。 

P 参照 ステ ー ト メン ト : RUN、COMMON 
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CHDIR 
ディ レク トリ ー の 変更 


上 機能 

ディ レク トリ ー を 変更 する 。MS-DOS の CHDIR コマ ンド と 同じ 機能 を 持っ 
て いる 。 
是 書 式 


CHDIR バス 名 


変更 し た い パ ス 名 を 文字 式 で 指定 する 。 





目 文 例 








CHDIR "MAILING" 
thePath$ = "B:\MODULES\DOSCALL" 
CHDTR thePath$ 





較 ノ ー ト 
ディ レク トリ の 作成 は 、MKDIR ステ ー ト メン ト を 使う 。 
ディ レク トリ の 削除 は 、RMDIR ステ ー ト メン ト を 使う 。 
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CIRCLE 
円 、 村 円 を 描く 


_ 機能 
円 また は 権 円 を 描く 
骨 書 式 


CIRCLE [STEP] (x, y), 半径 [, [カラ ー] 
[, [開始 点 ] [, [終了 点 ] [, 縦横 比 ]]]] 





時 引数 と オプ ショ ン 

引数 と オプ ショ ン 機 能 

STEP 現在 の グラ フィ ッ ク ・ カ ー ソ ル の 位置 か ら 相 対 的 に x, y 
の 座標 を 決め た いと き に 指定 する 。 

7 / 描く 円 また は 椿 円 の 中 心 の 座標 を 指定 する 。 

半径 中 心から の 円 の 半径 また は 椿 円 の 長 軸 を 指定 する 。 

ガサ ー 円 また は 椿 円 の カカ ラー を コー ド て 指定 する 。 

開始 点 円 また は 椿 円 の 一 部 だ け 描き た いと き の 最 初 と 最後 の 角 

終了 点 度 を ラジ アン て で 指定 する 。 

縦横 比 頂 円 を 描く と き の 中 心から の 縦 軸 と 横 軸 の 比率 を 指定 す 


る (1 を 超え る と 縦長 に な る )。 
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下 文 例 





FOR aspect = 1 TO 5 STEP .2 
CIRCEE (200 , 200),。 100。 , 。 。 aSpect 
NEXT aspect : 











弄 ノー ト 

が "STEP" を 省略 する と 絶対 座標 に な る 。 

ド ” 開 始点" と "終了 点 ? は 、-2 て 2z の 範囲 内 で な けれ ば な ら な い 。 

ド "開始 点 " を 省略 する と 0 を 設定 し 、" 終 了 点 "を 省略 する と 2z を 設定 する 。 
P "縦横 比 " を 省略 する と 1 が 設定 され る 。 

描い た あと の グラ フィ ッ ク ・ カ ー ソ ル の 位置 は 、 中 心 に 移動 する 。 
"STEP" を 省略 する と 絶対 座標 に な る 。 
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CLEAR 


変数 の 再 初期 化 / フ ァイル の クロ ー ズ / ス タッ ク ・ サ イズ の 設定 


目 機 能 

すべ て の 変数 を 再 初期 化し 、 フ ァイル を クロ ー ズ し 、 ス タッ ク ・ サ イズ を 設 
定 する 
征 書 式 


CLEAR に 。 スタ ッ ク ] 


時 オプ ショ ン 





必要 な スタ ッ ク ・ サ イズ を バイ ト 数 で 指定 する 。 


時 文例 










CLFAR , , 2024 





田 ノ ー ト 

p プロ シー ジャ ・ コ ー ル や サブ ルー チン ・ コ ー ル の レベ ル が 深かっ た り 、 再 帰 
的 な コー ル を 行なう プロ グラ ム で は 相応 の スタ ッ ク ・ サ イズ が 必要 に な る 。 

p 参照 関数 : SEPTMEM、FRE 
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CLOSE 


ファ イル の クロ ー ズ 


邊 機能 
ファ イル また は デバ イス へ の 入出 力 を クロ ー ズ する 


還 書 式 


CLOSE [[ 訂 ファ イル 番号 [, [ 訂 ファ イル 番号 ]...] 


還 引 数 と オプ ショ ン 
IE コレ アル ンス レン 


ファ イル 番号 クロ ー ズ し た い フ ァイル の 番号 を 指定 する 。 





時 文例 





OPEN "Foods.Dat'" FOR OUTPUT AS 1 
DO 
INPUT : "Product = ",」 aName$ 
TF aName$ = "" THEN 
EXIT DO 
END IF 
INPUT " , Sales = ",。 sales 
WRITE #1, aName$, sales 
LOOP 
CLOSE 1 





弄 ノ ー ト 
py ファ イル 番号 を 省略 する と 、 オ ー プ ン さ れ て いる すべ て を クロ ー ズ する 。 
p 参照 ステ チー トメント : OPEN、INPUT#、WRITE#、GET #、PUT# 
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CLS 
スク リー ン の クリ ア 


_ 機能 
クリー シン を クリ デ す 今 
上 書 式 


CLS [0|112)] 


オ プシ ョ ン 






表示 され て いる すべ て の テキ スト お よび グラ フィ ッ ク を 
クサ ア す る 。 
VIEW ステ ー ト メン ト に より 物理 ビュ ー ポ ー ト が 設定 され て いる 
と き は 、 そ の 範囲 内 の グラ フィ ッ ク を クリ ア す る 。 そ れ 以 外 は 、 
すべ て の グラ フィ ッ ク を クリ ア す る 。 
テキ スト だ け を クリ ア す る 。 



















肖 文 例 


CLS 


園 ノ ー ト 
オプ ショ ン を 指定 し な いと 、 テ キス ト と グラ フィ ッ ク を クリ ア す る 。 
テク リア し た 後 、 カ ー ソ ル は 、1,1( ホ ー ム ・ ポ ジ シ ョ ン ) の 位置 に 移動 する 。 
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COLOR 
スク リー ン 表 示 カラ ー の 設定 
目 機 能 


スク リー ン 表 示 の カラ ー を 設定 する 
邊 書式 


COLOR [前 景 カテ ラー] [, 背 景 カラ ー] 
記 引 数 と オプ ショ ン 


前 景 の カラ ー を 指定 する 。 





背景 の カラ ー を 指定 する 。 





出 文例 
| COLOR 10, 0 


| EiOCATE 1, 25 
PRTNT ">>>> QuickBASTC <<< く " 
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國 ノ ー ト 
mp テキ スト の カラ ー の 設定 は 、 以 下 の 意味 を も っ て いる 。 





グラ フィ ッ ク の カラ ー の 設定 は 、 属 性 番号 と し て の 意味 を も っ て いる 。 
と カラ ー の 種類 は 、SCREEN ステ ー ト メン ト で 設定 する パレ ッ ト 番 号 に 依存 









黒 、 青 、 緑 、 空色 、 赤 、 マジ ェ ン タ 、 黄 、 白 


ノー マル 表示 で プリ ンク させ る 
反転 表示 で プリ ンク させ る 


する 。 


由 カ ラー の コー ド と 属性 番号 の 対応 関係 は 、 PALLETTE ステ ー ト メン ト で 設 


定 する 。 
参照 ステ ー ト メン ト : SCREEN、PALETTE 
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COM(n) 
通信 ポー ト の イベ ント ・ ト ラッ ピン グ の 設定 


時 機能 
通信 ポー ト の イベ ント ・ ト ラッ ピン グ の 実行 の 有無 を 設定 する 
邊 書式 


COM(n) (ON | OFF | STOP) 


財 引 数 と オプ ショ ン 











に E レポ ン ルン P ン 
通信 用 の ポー ト 番 号 (1 また は 2) を 指定 する 。 
通信 ポー ト の イベ ント ・ ト ラッ ピン グ を 有効 に する 。 有 
効 で ある あい だ に 通信 デー タ を 受信 する と 、 

ON COM ステ ー ト メン ト 

で て 指定 し た イベ ント ・ ト ラッ ピン グ の サブ ルー チン を 実 
行 する 。 
通信 ポー ト の イベ ント ・ ト ラッ ピン グ を 無効 に する 。 
OFF は 、 そ の イベ ント を 保持 し な い が 、STOP は 、 保持 
し て いる の で トラ ッ ピ ング で きる よう に な る と ON 
COM の 処理 ルー チン を 実行 する 。 


STOP 


時 文例 








DR 








弄 ノ ー ト 
P 参照 ステ ー ト メン ト : ON event 
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COMMON 
グロ ー バ ル 変 数 の 定義 
= 機能 
モジ ュー ル 間 お よび プロ グラ ム 間 で 共通 し て 使う グロ ー バ ル 変 数 を 定義 する 
時 書式 


COMMON [SHARED] [/ ブ ロッ ク 名 /] 変数 [()] [AS タイ プ ] 
[, 変数 [()] [AS タイ プ ]]... 


時 引数 と オプ ショ ン 





JE レア ルン 







モジ ュー ル ・ レ ベル の 変数 を そ を の モジ ュー ル に 含ま れる 
すべ て の プロ シー ジャ と の 間 で 共有 化し た いと き に 指定 
する 。 
一 部 の 変数 だ け を 共有 し た いと き に グル ー プ 名 と し て 付 
ける 。 


グロ ー バ ル 変 数 と し て 宣言 し た い 変 数 を 指定 する 。 


SHARED 










/ ブ ロック 名 / 









78 







変数 の タイ プ を 指定 する 。 こ の タイ プ 指 定 を 行なう と 変 
数 名 に は 、 型 宣言 文字 (%%、&、! 、#、$) を 付け る 必要 は 
な い 。 










タイ プ 名 
INTEGER 


LONG 
SINGLE 
DOUBLE 


STRING 

















固定 長文 字 列 (n は 文字 長 ) 
STRING * n 


ユー ザー 定義 タイ プ | ユー ザー 定義 タイ プ 








還 文 例 


COMMON SystemLastMenu, SystemLastRec 
COMMON SystemWindowPtr, SystemWindowHdr 








較 ノ ー ト 

p この ステ ー ト メン ト は 、 共 有 し た い モ ジュ ー ル それ ぞ れ に お いて 宣言 し な け 
れ ば な ら な い 。 

共有 する モジ ュー ル 間 に お いて 、 変 数 名 は 同じ で ある 必要 は な い が 、 宣 言 す 
る と き の 順 番 お よび 型 は 同じ で な けれ ば な ら な い 。 

『 参照 スチ テート メン ト : CHAIN、DIM、SHARED 
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シン ポリ ッ ク 定 数 の 宣言 と 定義 
_ 機能 

シン ボリ ッ ク 定 数 を 宣言 お よび 定義 する 
征 書 式 


CONST 変数 名 = 式 , [, 変 数 名 = 式 ]... 


邊 引数 


定義 し た い 変 数 を 指定 する 。 





定数 と し て 代入 し た い 式 を 指定 する 。 


上 文 例 





CONST theName$ = "Twenty-One" 
CONST aCardMax = 13, typeMax = 4, cardsMax = aCardMax * typeMaxX 
CONST FALSE = 0, TRUE = NOT FALSE 





圏 ノー ト 

yp 「 シ ン ボ リッ ク 定 数 」 と は 、 プ ログ ラム の 実行 中 に 変え たり し な い 値 を も つ 
変数 を いう 。 

P 変数 の 型 宣言 文字 を 省略 する と 、 そ の 変数 の 型 は 式 の 型 に な る 。 

p 式 に は 、 リ テラ ル 定 数 お よび それ 以前 に 定義 し た シン ボリ ッ ク 定 数 、 演 算式 、 
論理 演算 式 を 使え を る が 、 関 数 や 通常 の 変数 は 使え な い 。 

pm モジ ュー ル 内 で 宣言 し た シン ボリ ッ ク 定 数 は 、 そ の モジ ュー ル に 対し て ロー 
カル に な る 。 


80 


DATA 
HEAD ステ ー ト メン ト で 読み 込む デー タ の 定義 


司 機 能 
READ ス テー トメ ント で 読み 込ま れる 定数 を 定義 する 
時 書式 


DATA 定数 1 [, 定数 2]... 


目 引 数 


READ ステ ー ト メン ト て 読み 込ま れる 定数 を 定義 する 











還 文 例 ① 
へ 
DIM dayName(6) AS STRTNG * 9 
FOR n = 0 TO 6 
READ dayName(n) 
NEXT n 
DATA Sunday, Monday, Tuesdar, Wednesday 
DATA Thursday, Friday, Saturday 





是 文 例 @ 





DATA 32。 ,。 45」。 “"" 
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当 ノ ー ト 

>: DATA ステ ー ト メン ト は 、 モ ジュ ー ル * レベ ル に 書か な けれ ば な ら な い 。 
数 値 型 の アー タ は 、 READ ステ ー ト メン ト で の 対応 する 変数 が 数 値 型 な ら ば 
数 値 デ ゲー タ と し て 読み 込ま れ 、 ま た 文字 列 変数 な ら ば 文字 デー タ と し て 読み 込 
表装 も あ ゃ 

p 文字 デー タ の 一 部 と し て 、"。”、”:"、 "空白 な ど を 定義 し た いと き は 、 
その 文字 列 全体 を " "で 囲む 。 

を メル ・ デ ー タ を 定義 せる と き は 、 文 例 ⑳ ぐ の よう に する 。 

p 参照 ステ ー ト メン ト : READ、 RESTORE 


DATES 


日 付 の 設定 
機能 
MS-DOS の 日 付 を 設定 する 
書式 
DATE$ = 日 付 
= ョ 






設定 し た い 日 付 を 文字 式 で 指定 する 。 











時 刻 は 、 "YYYY-MM-DD" 
年 (1980 一 2099) 一 一 ゴ 
月 (01 て 12) 
日 (01 一 末日 ) 


の 形式 で 指定 する 。 





文 例 ① 


| DATE$ = "1989-12-31" 


凡人 B 
DATE$ = "89-05-22" 

同 ノ ー ト 

『 年 の 部 分 は 、 下 2 桁 で も 指定 で きる (文例 ②) 。 

MS-DOS の DATE コマ ンド と 同じ 機能 を も っ て いる 。 

y MS-DOS 上 の 現在 の 日 付 を 知る に は 、TIME$ 関 数 を 使う 。 
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DECLARE [QuickBASIC] 


FUNCTION お よび SUB の 宣言 
機能 
FUNCTION お よび SUB を 宣言 する 。 引 数 が ある な ら ば 、 そ の 型 も 宣言 す 
る 。 
中 書式 


DECLARE (FUNCTION | SUB} プロ シー ジャ 名 
[([ 引 数 リス ト ])] 


時 引数 と オプション 











に IE: オレ ポン ルン ジン 
宣言 し た い プ ロ シ ー ジ ャ の タイ プ に 従っ て 、 ど ちら か を 
指定 する 。 
宣言 し た い プ ロ シ ー ジ ャ の 名 前 を 指定 する 。 
引数 が ある と き は 、() で 囲ん で 指定 し 、 な いと き は () の 
み を 書く 〈。 


FUNCTION 
SUB 


プロ シー ジャ 名 
引数 リス ト 













時 文例 





DECLARE FUNCTION BibarySearch% (itArray( ) , keyData ) 
DECLARE SUB ShowMenu (menuNo AS TNTKGKR) 
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圏 ノー ト 
CALL ステ ー ト メン ト を 使わ ず に 他 の モジ ュー ル に お ける プロ シー ジャ を コー ル す る 
(呼び 出す ) に は 、 使 用 する モジ ュー ル に お いて 、 こ の ステ ー ト メン ト を 使っ て 宣言 し な 
けれ ば な ら な い 。 
ド 引数 リス ト に お ける 変数 名 は 、 実 際 の プロ シー ジャ の 引数 名 と 同じ で ある 必要 は な い 
が 、 そ の 型 ・ 数 ・ 並 び は 、 同 じ で な けれ ば な ら な い 。 
引数 リス ト に お ける 型 の 宣言 は 、 

・ 型 宣言 文字 (%、&、! 、#、$) 

・AS タイ プ 

(INTEGER、LONG、SINGLE、DOUBLE、STRINC、 ユ ー ザ ー 定 義 型 ) 

の どちら か を 使っ て 行なう 。 
参照 ステ ー ト メン ト : CALL、 FUNCTION、SUB 
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DECLARE (eo 


他 の 言語 で 書い た プロ シー ジャ の 宣言 


_ 機能 
他 の 言語 で 書い た プロ シー ジャ の コー リン グ ・ シ ー ケ ンス を 宣言 する 
朋 書 式 


DECLARE 「FUNCTION | SUB) プロ シー ジャ 名 
[CDECL] [ALIAS "別名 中 [([ 引 数 リス ト ])] 


虹 引数 と オプ ショ ン 








GE: レン ンス ルン 
宣言 し (たい プ ロ シ ー ジ ャ の タイ プ に 従っ て 、 ど ちら か を 
指定 する 。 
宣言 し た い プ ロ シ ー ジ ャ の 名 前 を 指定 する 。 
C 言語 で 作成 し た プロ シー ジャ を 使う 場合 、 引 数 を 渡す 
と き の 並び を 左右 入れ 替え て 渡す こと を 指定 する 。 
プロ シー ジャ 名 の 代わ り に 別名 を 使う と き に 指定 する 。 


FUNCTION 
SUB 
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引数 リス ト 引数 が ある と き は 、() で 囲ん で 指定 し 、 な いと き は () の 

み を 書く 。 

1 つの 引数 は 、 つ ぎの シン タッ クス に 従う 。 

[BYVAL | SEG}] 引数 名 [AS タイ プ ] 

BYVAL... 指定 する と 値 に よる 渡し (pass by value) に な 
る の で 、 引 数 の 値 は 変更 され な い 。 
(INTEGER, LONG, SINGLE, DOUBLE の 
み 可 ) 

SEG  ... 引 数 の セグ メン ト 付 き far アド レス を 渡し た 
いと き に 指定 する 。 

タイ プ ..… つ き ぎの も の が 使え る 。 

INTEGER 

LONG 

SINGLE 

DOUBLE 

STRING 

ユー ザー 定義 型 
ANY( 型 を 問わ な い ) 





環 例 





DECLARE FUNCTTON GetCmd CDECL ALTAS "get_cmd"(BYVAL menu%,item% ) 


DECLARE SUB Mouse CDECI。 (ax%、 bx%。 cx%,。 dx% ) 





較 ノ ー ト 

CALL ステ ー ト メン ト を 使わ ず に 他 の モジ ュー ル に お ける プロ シー ジャ を コー ル す る 
(呼び 出す ) に は 、 使 用 する モジ ュー ル に お いて 、 こ の ステ ー ト メン ト を 使っ て 宣言 し な 
けれ ば な ら な い 。 

"別名 "は 、Quick BASIC で は 認め られ な い " "が 、C 言語 の 関数 名 に 含ま れ 
て いる と き に 使う 。 

ゅ 参照 スズ テー トメント : CALL、FUNCTION、SUB 
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DEF FNname 
関数 の 定義 


_ 機能 

関数 を 定義 する 。1 行 で 定義 むる に は 、 書 式 ① を 使う 。2 行 以上 使っ て 定義 す 
る と き は 、 書 式 ② を 使う 。 
時 書式 


①DEF FNname [( 引 数 リス ト )] = 式 


② DEF FNname [( 引 数 リス ト )] 
FNname = 式 


END DEF 


財 引 数 と オプ ショ ン 
引数 と オプ ショ ン 
定義 し た い 関 数 名 を 指定 する 。 


引数 リス ト 引数 が ある と き は 、 そ れ を () て 囲ん で 渡す 。 
その 関数 が 返す 値 を 指定 する 。 
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fnTncrement% (1i%) = i% + 1 
1 


fnTncrement%( n ) 


DEF fnTncrement% (1i%) 
fnTncrement% = i% + 1 

END DEF 

n = 1 

n = fnIncrement%(n) 





圏 ノー ト 

・ "FNname" は 、FN の 部 分 を 含め て 40 文 字 以内 で あり 、name の 先頭 は 文字 で 
な けれ ば な ら な い 。 

ぁ 戻り 値 の 型 は 、"FNname" に その 型 宣 言 文字 を 付け て 行なう 。 

ぁ 戻り 値 の 型 が 異な れ ば 、 別 の 関数 と し て 取り 扱わ れる 。 

引数 と し て 、 配 列 ・ ユ ー ザ ー 定 義 型 ・ 固 定 長文 字 列 を 渡せ な い 。 

ぁ 書式 ② で は 、 戻り 値 は 、 そ の FNname に 代入 する こと に より 返さ れる 。 これ 
を 行わ な いと 、0 ま た は ヌル が 返さ れる 。 

『 書式 ② に お いて 、END DEF 以前 に 強制 的 に 抜け 出る に は 、 EXIT DEF ス 
テー トメ ント を 使う 。 

P 参照 ステ ー ト メン ト : FUNCTION 
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DEF SEG 
セグ メン ト ・ ア ドレ ス の 設定 
_ 機能 
セグ メン ト ・ ア ドレ ス を 設定 する 


目 書 式 


DEF SEG [= アド レス ] 


オ プシ ョ ン 





下 文 例 





DEF SEG = &H7700 


圏 ノー ト 
と" アド レス "を 省略 する と 、 デ ー タ ・ セ グ メ ント (DS) が 設定 され ます 。 
参照 スチ テー トメ ント 
BLOAD、BSAVE、CALL ABSOLUTE、POKE 
p 参照 関数 : PEEK、VARSEG、VARPTR 
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DEFINT/DEFLNG/DEFSNG/DEFDBL/DEFSTR 
型 の 設定 


目 機能 
変数 、DEF FN、 お よび FUNCTION の 型 を 設定 する 。 設定 で きる 
型 は 、 整 数 型 ・ 長 整数 型 ・ 単 精度 型 ・ 倍 精度 型 ・ 文 字 列 型 で ある 。 
目 書 式 


DEFINT 文字 範囲 [, 文字 範囲 ]... 
DEFLNG 文字 範囲 [, 文字 範囲 ]... 
DEFSNG 文字 範囲 [, 文字 範囲 ]... 
DEFDBL 文字 範囲 [, 文字 革 囲 ]... 
DEFSTR 文字 範囲 [, 文字 範囲 ]... 


骨 引 数 











設定 し た い ア ルフ ァ ベ ッ ト 文 字 の 範囲 を 
文字 - 文 字 
の 形式 で 指定 する 。 












DEFINT 整数 型 

DEFLNG 長 整数 弄 
DEFSNG 単 精度 型 
DEFDBL 倍 精度 型 
DEFSTR 文字 列 型 
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目 文 例 


DEFINT A-C 
DEFLNG L, X-Z 


DEFSTR O-P, S 





圏 ノー ト 
アル ファ ベッ ト の 大 文字 と 小文字 の 区 別 は な い 。 
ぁ 参照 ステ ー ト メン ト : DIM 


DIM 
配列 ご 変数 の 型 の 宣言 


_ 機能 

配列 と 変数 の 型 を 宣言 し 、 必要 な メモ リー・ ス ペー ス を 割り 当て る 。 ま た 、 
モジ ュー ル ・ レ ベル 内 で 共通 に 使え を る グロ ー バ ル 変 数 を 宣言 する 。 

同書 式 


DIM [SHARED] 変数 [( 添 字 .…)] [AS タイ プ ] 
[, 変数 [( 深 字 ..)] [AS タイ プ ]]... 


時 引数 と オプ ショ ン 






モジ ュー ル ・ レ ベル の 変数 を その モジ ュー ル に 含ま れる 
すべ て の プロ シー ジャ と の 間 で 共有 化し た いと き に 指定 
する (グロ ー バ ル 変 数 と し て 宣言 する )。 


宣言 し た い 変数 を 指定 する 。 


変数 を 配列 と し て 宣言 する と き に その 次 元 と 範囲 を 指定 
する 。 
添字 は 、 以 下 の よ うに し て 最大 60 次 元 まで 指定 で きる 。 
(添字 [, 添字 , .….]) 
1 つの 添字 の 範囲 (-32768 一 32767) は 、 
[下限 TO] 上 限 
の 形式 で 指定 する 。 
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上 文例 


変数 の タイ プ を 指定 する 。 こ の タイ プ 指 定 を 行なう と 変 
数 名 に は 、 型 宣言 文字 (%、&、! 、#、$) を 付け る 必要 は 
な い 。 
タイ プ 名 
INTEGER 
LONG 


SINGLE 
DOUBLE 


STRING 


ユー ザー 定義 タイ プ | ユ 


整数 型 
長 整数 弄 















固定 長文 字 列 (n は 文字 長 ) 
STRING * n 





ーーー 


TYPE DateType 


Year AS INTEGER 
month AS INTEGER 
day AS INTEGER 


| END TYPE 


DIM menuItem(5, 10) AS STRING * 10, lastDayOfMonth( 1 TO 12) 
DIM birthdav AS DateType 


過 ノ ー ト 


参照 スチ テー トメ ント 
SHARED、 COMMON、STATIC、OPTION BASE 
『 参照 関数 : LBOUND、UBOUND 
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DO.….LOOP 


繰り 返し 実行 


| 機能 
DO と LOOP の あい だ の ステ ー ト メン ト を 繰り 返し 実行 する 
明 書 式 


①PDO [WHILE | UNTIL) 論理 式 ] 
[ステ ー ト メン ト ・ プ ブロック] 
LOOP 


② DO 
[ステ ー ト メン ト ・ プ ロック] 
LOOP [{WHILE | UNTIL) 論理 式 ] 


過 オ プシ ョ ン 






WHILE は 、 ス テー トメ ント ・ ブ ロッ ク を その 論理 式 が 真 
で ある あい だ 、 実 行 さ せ た い と き に 指定 する 。 
UNTIL は 、 ス テー トメ ント ・ プ ロッ ク を その 論理 式 が 真 
に な る まで 、 実 行 さ せ た い と き に 指定 する 。 
繰り 返し 実行 し た い ス テー トメ ント 







ステ ー ト メン ト ・ ブ ロッ ク 





上 文例 ① : 3 回 繰り 返し 実行 する 


の 狼 も = 1 お = キ 

DO WHILE cnt <= 3 DO UNTIL cnt > 3 
cnt = cnt + 1 cnt = cnt + 1 

LOOP LOOP 
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cnt = 1 cnt = 1 


DO DO 
cnts=icnt + 1 @ 莉 名 = G 和 きも †+ 1 
LOOP WHILE cnt <= 3 LOOP UNTIL cnt > 3 





財 ノ ー ト 

ぁ p 書式 で は 、 最 初 に テス ト さ れる の で 、 そ の ルー プ を 初め て 実行 する と き に 
論理 式 が 偽 な ら ば 、 一 度 も その ルー プ を 実行 し な い 。 

p 書式 ② で は 、 最 後に テス ト さ れる の で 、 そ の ルー プ は 少な く と も 1 回 は 実行 さ 
れる 。 

"WHILE 論理 式 " ま た は "UNTTIL 論理 式 "の 部 分 を 省略 する と 無限 シー プ 
に な る 。 

P 論理 式 の テス ト 結 果 に 関係 な く 、 ル ー プ か ら 抜 け 出る に は 、 EXIT DO ステ 
ー ト メン ト を 使う 。 

p 参照 テー トメ ント : WHILE、FOR 
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DRAW 
マク ロ ・ コ マン ド を 使っ た 描画 


_ 機能 

マク ロ ・ コ マン ド で 定義 し た オプ ジェ クト を グラ フィ ッ ク ・ ス クリ ー ン に 措 
く 
財 書 式 


DRAW マク ロ 文 字 式 


還 引 数 


グラ フィ ッ ク の オプ ジェ クト を 描く た め の コ マン ド と パ 
ラメ ー タ を 文字 列 と し て 指定 する 。 





時 文例 





DRAW “TA=" + VARPTR$(angle) + "BM300,200 R100 D100 L100 U100" 


FOR angle = 0O TO 360 STEP 30 
NEXT 





賠 ノ ー ト 
マク ロ ・ コ マン ド と し て 、 以 下 の も の が 用 意 き され て いる 。 


ペン 先 の 移動 だ け を 行なう 。 


元 の 位置 に 戻る 。 
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L [n] n 単位 だ け 左 に 移動 する 。 
R [n] n 単位 だ け 右 に 移動 する 。 
U[n] n 単位 だ け 上 に 移動 する 。 
D [n] n 単位 だ け 下 に 移動 する 。 
H [n] |n 単 位 だ け 左上 に 移動 する 。 
G [n] |n 単 位 だ け 左下 に 移動 する 。 
E [n] |n 単 位 だ け 右 上 に 移動 する 。 
F [n] n 単位 だ け 右 下 に 移動 する 。 


Mx, y x。 y に 符号 を 付け な いと 座標 (x。 y) に 移動 する 。 
x。y に 符号 を 付け る と 現在 の 座標 か ら 相対 的 に 移動 する 
(x と y の 間 に ", "が 必要 )。 

An 以後 描く も の を 回 転 さ せる 。 n は 、 0 一 3 で 指定 し 、 そ れ ぞ 
れ 0*、90*、180"、270* を 意味 する 。 


TAn 以後 描く も の を 回 転 さ せる 。 n は 、 そ の 和 度 (-360' 一 360') 





を 指定 する 。 
Cn カラ ー 属 性 を n で 指定 する 。 
Sn スケ ー ル の 倍 謗 を n(1 一 255) で 指定 する 。 


Pp, b | 塗り つぶ す カ ラー を p て で 指定 し 、 境 界 線 カラ ー を b て 指 
定 する (p と b の 間 に ", "が 必要 )。 

X マク ロ の 一 部 と し て 文字 列 変数 を 使う と き に 指定 する 。 
文字 列 変数 の 部 分 に は VARPTR$ を 使う 。 


cmd = マク ロ の 一 部 と し て 数 値 変数 を 使う と き に 指定 する 。 
数 値 変数 の 部 分 に は VARPTR$ を 使う 。 


※ B、N は 、 移 動 コ マン ド の 前 に 付け て 使う 。 
※ X。 cmd = は 、BASICA と の 互換 性 を 保つ た め に も ある 。 


ぁ 参照 ステ ー ト メン ト : COLOR、PALETTE、PAINT 
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END 


プロ グラ ム 、 プ ロ シ ー ジ ャ 、 ブ ロッ ク の 終了 


"機能 
プロ グラ ム 、 プ ロ シ ー ジ ャ 、 ま た は ブロ ッ ク を 終了 する 
邊 書式 


END [DEF | FUNCTION | IF | SELECT | SUB | TYPE)] 











財 オ プシ ョ ン 

レア ムン P ン 機 能 

DEF DEF FN に よる 関数 の 定義 を 終え る 。 
FUNCTION FUNCTION プロ シー ジャ の 定義 を 終え る 。 
IF IF に よる 分 岐 を 終え る 。 

SELECT SELECT CASE に よる 分 岐 を 終え る 。 
SUB SUB プロ シー ジャ の 定義 を 終え る 。 
TYPE ユー ザー 定義 型 の 変数 の 定義 を 終え る 。 
和文 例 

ae 当 
圏 ノー ト 


オプ ショ ン を 省略 し た と き は 、 プ ログ ラム の 実行 は 終わ る 。 統 合 環境 下 で 実 
行 し た プロ グラ ム は 、 そ の プロ グラ ム を 終了 する 。 ま た 、 実行 可能 ファ イル 形 
式 (、EXE) の プロ グラ ム を 実行 し た と き は 、 そ の プロ グラ ム を 終了 し DOS へ 制 
御 を 戻す 。 

p 参照 ステ ー ト メン ト 

DEF FN、FUNCTION、IF、SELECT、SUB、 TYPE、STOP 
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ENVIRON 
環境 変数 の 設定 


"機能 
MS-DOS の 環境 変数 を 設定 ・ 変 更 する 
上 書式 


ENVIRON 文字 式 


時 引数 


設定 も し く は 変更 し た 環境 変数 名 と その 文字 列 を 1 つの 
文字 式 と し て 指定 する 。 





重文 例 





ENVTRON "ERROR=ON" 
ENVIRON "PATH=A:\jB:\)Ci\ ま 7 








國 ノ ー ト 

P 環境 変数 に つい て は 、MS-DOS の SET、PATH、PROMPT コマ ンド を 参 
照 の こと 。 

p 参照 ステ ー ト メン ト : SHELL 
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ERASE 
静 的 配列 の 再 初期 化 / 動 的 配列 の 解放 


目 機 能 
静 的 配列 を 再 初期 化 ま た は 動 的 配列 を 解放 する 
時 書式 


ERASE 配列 名 [, 配列 名 ...] 


四 引 数 


再 初期 化し た い 静 的 配列 変数 名 また は 解放 し た い 動 的 配 


列 変数 名 を 指定 する 。 





?$STATTC 
DIM stock( 1 TO 100) 

? $DYNAMTC 

DIM temporary(20, 50) 





ERASE stock, temporarY 








圏 ノー ト 

p 静 的 配列 の 再 初期 化 で は 、 そ の 変数 の 内 容 が 初期 化 さ れる の に 対し 、 動 的 配 
列 の 解放 で は 、 そ の 変数 自体 が 消去 され る 。 し た が っ て 、 そ の 動 的 配列 変数 を 
使う に は 、DIM また は REDIM ステ ー ト メン ト で 宣言 し な けれ ば な ら な い 。 

p 参照 テー トメント : DIM、REDIM 

参照 コマ ンド : $DYNAMIC、$STATIC 
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ERROR 


エラ ー の シミ ュ レ ー ト 
_ 機能 
エラ ー の 発生 を シミ ュ レ ー ト する 
邊 書式 


ERROR エラ ー・ コ ー ド 


時 引数 と オプ ショ ン 





目 文例 
ON ERROR GOTO ErrorHandleRoutine 


ErrorHandleRoutine: 
ERROR ERR 


圏 ノー ト 
エラ ー・ コ ー ド 1 へ 76 は 、 エ ラー・ メ ッ セ ー ジ を 表示 する 。 


1 


10g 


EXIT 


関数 、 ル ー プ 、 プ ロ シ ー ジ ャ か ら の 強制 脱出 


邊 機能 
DEF FN 関数 、DO..…LOOP、 FOR..…NEXT、FUNC TION、SUB か ら 抜 


け 出 る 
邊 書式 


EXIT (DEF | DO | FOR | FUNCTION | SUB) 


用 引数 


DEF FN に よる 関数 の 定義 か ら 抜 ける 。 
DO.….LOOP か ら 抜 ける 。 





FOR.…NEXT か ら 抜 ける 。 
FUNCTION FUNCTION プロ シー ジャ の 定義 か ら 抜 ける 。 
SUB プロ シー ジャ の 定義 か ら 抜 ける 。 
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時 文例 





OPEN "Fruit.Dat" FOR RANDOM AS 1 LEN = 12 
FIELD #1, 10 AS nameFld$, 2 AS salesF1d$ 
recNum = 1 
DO 
TNPUT : " Fruit (<cr> for EXIT) = ",。 itName$ 
TF itName$ = "" THEN 
EXIT DO 
END IF 
INPUT " , amount = "。 amount 
LSET nameF1d$ = itName$ 
RSET salesF1d$ = MKT$(amount ) 
PUT #1, recNum 
recNum = recNum + 1 
LOOP 
CLOSE 1 
END 





園 ノー ト 
p EXIT DO と EXIT FOR は 、 こ れ を 含む 一 番 内 側 の ルー プ を 抜け 出る 。 要 
する に 、 ル ー プ を ネス ティ ング し て いる と き は 、 一 つ 上 の レベ ル に 抜け る こと 
に な る 。 
p 参照 ステ ー ト メン ト 

DEF FN、DO..…LOOP、FOR.…NEXT、FUNCTION、SUB 
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FIELD 


ラン ダム アク セス ・ フ ァイル ・ バ ッ フ ァ の 定義 


邊 機能 

ラン ダム アク セス ・ フ ァイル の バッ ファ に お ける 変数 を 定義 し メモ リー を 割 
り 当 て る 
征 書 式 


FIELD [ 鹿 ファ イル 番号 , フィ ー ル ド 幅 AS 文字 列 変数 
[, フィ ー ル ド 幅 AS 文字 列 変数 .……] 


中 引数 












OPEN ステ ー ト メン ト で オー プン し た と き の フ ァイル 
番号 を 指定 する 。 


フィ ー ル ド ・ バ ッ フ ァ を 構成 する 要素 の バイ ト 数 を 定義 
する 。 


フィ ー ル ド ・ バ ッ フ ァ を 構成 する 要素 の 名 前 を 設定 する 。 


ファ イル 番号 













フィ ー ル ド 幅 





文字 列 変数 
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邊 文例 ① 





OPEN "Fruit.Dat" FOR RANDOM AS 1 LEN = 12 
FTELD #1, 10 AS nameF1d$, 2 AS salesF]1d$ 
recNum = 1 


DO 
TNPUT : " Fruit (<cr> for EXTT) = "。 itName$ 
TEF itName$ = "" THEN 
EXTIT DO 
END IF 
TNPUT " 。 amount = "。 amount 


LSET nameF1d$ = itName$ 
RSET salesF1d$ = MKI$(amount ) 
PUT #1, recNum 
recNum = recNum + 1 
LOOP 
CLOSE 1 
END 








財 文 例 @ 


OPEN "Fruit.Dat" FOR RANDOM AS 1 LEN = 12 
FIELD #1, 10 AS nameF1d$, 2 AS salesF1d$ 
recNum = 1 

PRINT " N A ME amount 『" 


GET #1。 recNum 
TF EOF(1) THEN 
EXIT DO 
END IF 
itName$ = nameF1d$ 
amount = CVI(salesF1d$ ) 





PRINT itName$: " = ": USING "##」###": amoun も t 
recNum = recNum + 1 

| LOOP 

| CLOSE 1 


| END 
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画 ノ ー ト 
P FIELD バッ ファ は 、 文 字 列 と し て 取り 扱わ な けれ ば な ら な い 。 
P FIELD バッ ファ に 書き 込む に は 、LSET、RSET ステ ー ト メン ト を 使う 。 
y FIELD バッ ファ に 数 値 を 書き 込む に は 、 MKI$、 MKL$、 NKS$、 MKD* 関 
_ 数 を 使っ て 文字 列 に し て か ら 行なう 。 
P FIELD バッ ファ の 文字 列 に な っ て いる 数 値 デ ー タ は 、CVI、CVL、CVS、 
CVD 関数 を 使っ て 数 値 に し て か ら 計 算 な ど に 使う 。 
P 参照 スチ テート メン ト 
OPEN、GET #、PUT #、CLOSE、MKIS$、MKL$、NKS$、MKD$、 
CVI、 CVL、CVS、CVD、LSET、RSET 
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FILES 


ファ イル 名 の 表示 
目 機 能 
ディ スク 上 の ファ イル 名 を 表示 する 
正 書 式 


FILES [ファ イル 名 ] 


圏 オ プシ ョ ン 














表示 し た い フ ァイル また は ディ レク トリ の パス を 指定 
する 。 


ファ イル 名 























生 文 例 
FILES "BIN\" | 
| 
く 実 行 結果 > 
/P に ヽ 
Ai: \QB 
く <DIR> ・。 。 <DIR> QB ・EXE QB ・HLP 
QB ・TNI QB ・BI MOUSE COM BC ・EXE 
| LTIB .EXE LINK .EXE BRUN42A .EXE CODEVIEw.DOC 
CV ・EXE CVPACK  .EXE CV ・HLP 
圏 ノー ト 


p ファ イル 名 の 一 部 に ワイ ルド ・ カ ー ド が 使え る 。 
ファ イル 名 を 省略 する と 、 カ レン ト ・ デ ィ レ クト リ の ファ イル 名 を 表示 する 。 
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FOR..….NEXT 


繰り 返し 実行 
機能 
指定 し た 回 数 だ け 一 群 の ステ ー ト メン ト を 繰り 返し 実行 する 
中 書式 


FOR カウ ンタ ーj = 初期 値 TO 終了 値 [STEP 増分 ] 


NEXT [カウ ンタ ーi[, カウ ンタ ー」j.…]] 


時 引数 と オプ ショ ン 







ルー プ の 回 数 を 数 える た め に 数 値 変数 で ある 。 
ルー プ を 開始 する と き に 、 カ ウン ター」j に 代入 され る 値 
を 指定 する 。 
カウ ンタ ー」 の 最後 の 値 、 す な わ ち テス ト に 使う 値 を 指 
定 する 。 
1 回 ルー プ す る ご と に カウ ンタ ー」j に 加え る 値 を 指定 す 
る 。 














邊 文例 ① 





FOR n = 1 TO 12 
print month(n) 
NEXT n 
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定め 


| ょ 


| 0. kre n < く = 12 
| Print month(n ) 
nm = n+ 1 


LOOP ] 








固 ノ ー ト 

y STEP 1 の と き は 、"STEP 増分 "を 省略 で きる 。 

『 増分 は 、 整 数 で な く て も よい 。 

『 増分 は 、 負 で あっ て も よい 。 こ の と き は 、 初 期 値 >= 終 了 値 で な けれ ば な ら な 
い 。 

増分 が 0 以上 で か つ 初 期 値 > 終了 値 な ら ば 、 ル ー プ 内 は 一 度 も 実行 され な い 。 
NEXT に 続く カウ ンタ ー i、}j の 部 分 で は 、 よ り 内 側 の ルー プ の 変数 を 左側 に 
書く 。 

p FOR.…NEXT ステ ー ト メン ト に よる アル ゴリ ズム は 、DO.…LOOP ステ ー ト 
メン ト を 使っ て も 可能 で ある (文例 ②)。 

p 論理 式 の テス ト 結 果 に 関係 な く 、 ル ー プ か ら 抜 け 出る に は 、EXIT FOR ステ 
ー ト メン ト を 使う 。 

『 参照 テー トメ ント : DO、WHILE 
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FUNCTION 


FUNCTION プロ シー ジャ の 定義 


滞 機 能 
FUNCTION プロ シー ジャ を 定義 むす る 。Quick BASIC の 組み 込み 関数 と 同 


様 に 、 式 の 中 で 使う 。 
邊 書式 


FUNCTION プロ シー ジャ 名 [( 引 数 リス ト )] [STATIC] 


プロ シー ジャ 名 = 式 





END FUNCTION 


時 引数 と オプ ショ ン 






IE: レア ンク 






FUNCTION プロ シー ジャ 名 を 40 文 字 以 内 で 指定 する 。 
返す 値 の 型 宣言 を 最後 に つけ る か の 型 宣言 を 行なう 。 
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SUB プロ シー ジャ が コー ル 側 か ら の パラ メー ター を 受 
け 取 る た め の 引 数 リス ト で ある 。 
この 引数 は 、 
変数 [())] [AS タイ プ ] 
1 1 1 
SUB 内 で 使 配列 用 つぎ の どれ か で 指定 する 
う 変数 名 (省略 可 ) ・INTEGER( 整 数 ) 
・LONG() 
・SINGLE() 
・DOUBLE() 
・STRING() 
(固定 長文 字 列 は 不可 ) 
・ ユ ー ザ ー 定 義 タ イプ 
か ら な り 、 複 数 ある と き は カン マ で 区 切る 。 


その FUNCTION が 返す 値 で ある 。 
これ を 指定 する と 、 そ の ロー カル 変数 は 保 た れる 。 


引数 リス ト 







STATIC 





軒 文 例 ① 








DECLARE FUNCTTON binarySearch%( anArray( ) , target ) 
DIM userNo( 1 TO 100) 


theNo = 42 
isStat% = binarySearch%(userNo( ) , theNo ) 
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目 文 例 @ 


> 配列 デー タ を 使っ た バイ ナリ ー・ サ ー チ 
FUNCTTION binarySearch% (theArray( ) , keyData ) 
1ow = LBOUND( theArray ) 
high = UBOUND(theArray ) 
WHILE (1ow <= high ) 
mid = INT((1ow + high) / 2) 
TIF (keyData < theArray(mid) ) THEN 
high = mid - 1 
ELSEIF (keyData > theArray(mid) ) THEN 
1ow = mid + 1 
ELSE 
binarySearch% = mid 
EXIT FUNCTTION 
END IF 
WEND 
binarySearch% = -1 
END FUNCTTON 





田 ノ ー ト 

FUNCTION プロ シー ジャ が 返す 値 は 、 そ の 型 宣言 と に 司 じ で な けれ ば な ら な 
い 。 

y コー ル 側 の 引数 の 数 お よび タイ プ と 同じ で な けれ ば な ら な い 。 

p 引数 リス ト に お ける 変数 の 名 前 は 、 コ ー ル 側 の 変数 名 と 同じ で ある 必要 は な 
い 。 

P 引数 は 、 参照 渡し (call by reference) され る の で 、 プロシージャ 内 で の 書換 
え が 可 能 で ある 。 

引数 リス ト に お ける 変数 は 、 FUNCTION 内 に お いて ロー カル で ある の で コ 
ー ル 側 に 戻る と き 自 動 的 に 消滅 する 。 

引数 リス ト の 中 で 配列 変数 を 使う と き は 、 そ の 変数 名 に 続け て () の み を 付け 
る 。 

プロ シー ジャ 名 = 式 を 省略 する と 、 数 値 型 な ら ば 0 (ゼロ ) 、 文 字 型 な ら ば 
ヌル を 返す 。 

p END FUNCTION 以前 で コー ル 側 に 戻る に は 、EXIT FUNCTION ステ 
ー ト メン ト を 使う 。 
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GET し 


ラン ダム アク セス ・ フ ァイル / 人 バイ ナリ ー・ フ ァイル か ら の 読み 込み 


_ 機能 

ラン ダム アク セス ・ フ ァイル また は バイ ナリ ー・ フ ァイル か ら デ ー タ を 読み 
込む 
時 書式 


GET [ 訂 ファ イル 番号 [, レコ ー ド 番号 [, 変数 ]] 


虹 引 数 










OPEN ステ ー ト メン ト で オー プン し た と き の フ ァイル 
番号 を 指定 する 。 
ラン ダム アク セス ・ フ ァイル の と き は 、 次 に 読み 込む レ 
コー ド の 番号 ( 1 一 2147483647) を 指定 する 。 

バイ ナリ ー・ フ ァイル の と き は 、 次 に 読み 込む バイ ト の 
開始 位置 ( 1 て ファ イル ・ サ イズ ) を 指定 する 。 
読み 込む デー タ を 格納 する た め の 変 数 を 指定 する 。 


ファ イル 番号 











TYPE FoodRecType 
itName AS STRING * 10 
| amount AS INTEGER | 
] END TYPF 
| DIM fruit AS FoodRecType 


| OPEN "Fruit.Dat" FOR RANDOM AS 1 LEN = LEN(fruit ) 
| recNum = 1 | 
PRINT " N AME amount 『" 
BRTNPD ゆーー ニ ーー ニニ ニニ ニー ニニ ー ニ ニー ニニ ーー " 
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DO 
GET #1, recNum, fruit 
TEF EOF( 1 ) THEN 
EXIT DO 
END 1F 
PRINT fruit.itNamei " = ": USTNG 「## す 」## す すり: fruit.amount 
recNum = recNum + 1 
LOOP 
CLOSE 1 
END 





ヽ 





邊 文例 @ 















) ファ イル の コピ ー 
DIM oneByte AS STRING * 1 
) enter fi]e names ,.. 
INPUT "Source fi1e name = "。 sourceFile$ 
TINPUT "Destination fi1e name = ",。 destFi1e$ 
? QBGeD の 。。。 
OPEN sourceFile$ FOR BINARY AS 1 
OPEN destFile$ FOR BINARY AS 2 
bytePos = 1 
DO 

GET #1, bytePos , oneByte 

TF EOF( 1 ) THEN 

EXTT DO 

END IF 

PUT #2, bytePos , oneByte 

bytePos = bytePos + 1 
LOOP 
CLOSE 1, 2 
END 





= / 








圏 ノー ト 

"変数 "に レコ ー ド 型 変数 を 使う と き は 、 そ の 宣言 名 だ け で よい 。 

FIELD ステ ー ト メン ト に よっ て バッ ファ を 割り 当て る と き は 、" 変 数 "の 部 
分 は 省く (FIELD ステ ー ト メン ト を 参照 ) 。 

放 バイ ナリ ー・ フ ァイル か ら は 、 そ の 変数 の サイ ズ に 等 し い バ イト 数 だ け 読 み 
込ま れる 。 

『 参照 ステ ー ト メン ト : OPEN、PUT #、FIELD、CLOSE 


第 3 章 @ ス テー トメ ント ーー]15 








GE レラ フック 
グラ フィ ッ ク ・ イ メー ジ の 保存 


ョ 機能 
スク リー ン の グラ フィ ッ ク ・ イ メー ジ を 配列 変数 に 保存 する 
時 書式 


GET [STEP] (x1, y1) - [STEP] (x2, y2), 
配列 名 [( イ ン デ ックス )] 


目 引 数 と オプ ショ ン 


EE レン ンス レン 
現在 の グラ フィ ッ ク ・ カ ー ソ ル の 位置 か ら 相対 的 に xy 
の 座標 を 決め た いと き に 指定 する 。 

(x1。y1) 保存 し た い 範囲 の 対 角 座 標 を 指定 する 。 


(x2, y2) 
保存 先 の 数 値 型 配列 変数 名 を 指定 する 。 


保存 する イメ ー ジ を どの 配列 要素 か ら 始め る か を 指定 す 
る 。 
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上 文例 








隊 間 wt) ヽ 
READ x1,。 Y1。 x2, y2 


DATA 1, 1, 100, 100 

bytes = 4 + 4 * INT(((x2 - x1 + 1) + 7) / 8) * (y2 - y1 + 1) 
DIM imageSample(bytes / 2) AS INTEGER 

SCREEN 88, , 0, 1 

生ま 半生 0 に 性 (2 の 。 yy る 0。、。 BIW 

GET (x1, yY1)-(x2, y2), imageSample 

PUT (200, 200) , imageSample 

PCOPY 0,。 1 








圏 ノー ト 
『 保存 に 必要 な 配列 の バイ ト ・ サ イズ は 、 つ ぎの 式 で 求め ます 。 
4 十 4* INT(((x2-x1 十 1) 十 7) /8) * (y2-y1 十 1) 
P 保存 に 必要 な 配列 の 上 限 は 、 上 の 式 で 求め た サイ ズ を 満た す よ うに 設定 し な 
けれ ば な ら な い 。 





1 要素 の バイ ト 数 


長 整数 | 4 バイト 





P 参照 スチ テー トメ ント : PUT、BSAVE、BLOAD 
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GOSUB 


サブ ルー チン へ の 分 岐 


_ 機能 
サブ ルー チン へ 分 岐 する 
邊 書式 


GOSUB  { 行 番号 | 行 ラ ベル } 


骨 引 数 










分 岐 し た い サ プル ー チ ン の 行 番号 また は ラベ ル を 指定 す 
る 。 

行 番号 は 、0 か ら 65529 の 範囲 で な けれ な ら な い 。 

行 ラ ベル に つい て の ルー ル 

・ 文 字 で 始め な けれ ば な ら な い 

・" で 終わ ら な けれ ば な ら な い 

・40 文 字 以 内 で な けれ ば な ら な い 

・ 大 文字 と 小文字 の 区 別 は な い 
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邊 文例 














TEF yesNo$ = "YES" THEN 
GOSUB GetNameRoutine 
ELSE 
GOSUB GetAddrRoutine 
END IF 






END 
GetNameRoutine : ) サブ ルー チ . ン 


RETURN 
GetAddrRoutine: >) サブ ルー チン 


RETURN 





皿 ノ ー ト 

P GOSUB ステ ー ト メン ト に お ける 行 ラ ベル 名 の 末尾 に は 、" : "を つけ な い 。 
サブ ルー チン か ら 戻る に は 、RETURN ステ ー ト メン ト を 使う 。 

p 他 の モジ ュー ル や プロ シー ジャ の サブ ルー チン へ は 分 岐 で き な い 。 

p 参照 ステ ー ト メン ト : RETURN 





第 3 章 @⑳ ス テー トメ ント ーー 一 ]18 


GOTO 


強制 分 岐 


旧 機 能 
特定 の 行 に 無 条 件 で 分 岐 する 
全書 式 


GOTO { 行 番号 | 行 ラ ベル } 


財 引 数 







強制 的 に 分 岐 し た い 行 番号 また は ラベ ル を 指定 する 。 
行 番号 は 、0 か ら 65529 の 範囲 で な けれ ば な ら な い 。 
行 ラ ベル に つい て の ルー ル 
・ 文 字 で 始め な けれ ば な ら な い 
・": "で 終わ ら な けれ ば な ら な い 
・40 文 字 以 内 で な けれ ば な ら な い 
・ 大 文字 と 小文字 の 区 別 は な い 
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上 文例 


TF yesNo$ = "YES" THEN 
GOTO GetNameRoutine 
ELSE 
GOTO GetAddrRoutine 
END IF 


GetNameRoutine: 
END 
GetAddrRoutine: 


END 





較 ノ ー ト 

y COTO ステ ー ト メン ト に お ける 行 ラ ベル 名 の 末尾 に は 、" : "を つけ な い 。 

を y 他 の モジ ュー ル や プロ シー ジャ へ GOTO ステ ー ト メン ト を 使っ て 分 岐 は で 
きだ ない 。 
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IF 
分 時 


_ 機能 

論理 式 の 評価 結果 に 基づい て 分 岐 し 実行 する 。 

書式 は 、1 行 で 書く IF ステ ー ト メン ト で あり 、 書 式 の は 、 ブ ロッ ク 形 式 の 
IF ステ ー ト メン ト で ある 。 
邊 書式 


①IF 論理 式 THEN then パ ー ト [ELSE else パー ト ] 
②IF 論理 式 1 THEN 

ステ ー ト メン ト ・ ブ ロッ ク 1 

[ELSEIF 論理 式 2 THEN 

[ステ ー ト メン ト ・ ブ ロック 2 ] 


” [ELSE 
ステ ー ト メン ト ・ ブ ロッ ク n]] 
END IF 


財 引 数 と オプ ショ ン (書式 ①) 






then パー ト 





else パー ト 


邊 文例 ① 





「 isResponse$ = "Y" THEN PRINT "Yes" ELSE PRINT "No " 








1@e 


画 ノ ー ト 

p ELSE 以下 の 部 分 は 省略 で きる 。 

"then パー ト ” と "else パー ト ” に は 複数 の ステ ー ト メン ト が 書け る 。 ここ で 
は 、GOTO で 分 岐 す る 行 の 指定 に 行 番号 を 使う と き は GOTO を 省略 で きる 。 


邊 引数 と オプ ショ ン ( 書 式 @) 










GE: ん レン スン ピス 


論理 式 1 上 m が 真 の と き に 実行 させ た い ス テー トメ ン 
ト を 書く 。 
論理 式 1 ーm の すべ て が 偽 の と き に 実行 させ た い ス テ 
as ト メ ン ト を 書く o 


プロ ッ ク 1 一 m 


正文 例 @ 








SUB binarySearch (isStat, theArray()。 keyData) 
1ow = LBOUND(theArray) 
high = UBOUND(theArray ) 
WHILE (1ow <= high) 
mid = INT((1ow + high) / 2) 
IF (keyData < theArray(mid) ) THEN 
high = mid - 1 
ELSEIF (keyData > theArray(mid) ) THEN 
1ow = mid + 1 
ELSE 
isStat = mid 
EXIT SUB 
END IF 
WEND 
isStat = -1 
END SUB 











較 ノ ー ト 

ぁ 構造 化 プ アロ グラ ミン グ に は 、 書 式 ② の 方 が 適し て いる 。 
"ELSE" 以 下 の 部 分 は 省略 で きる 。 

p "END IF" の 部 分 は 省略 で き な い 。 

p 参照 ステ ー ト メン ト : SELECT CASE 
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INPUT 
キー ボー ド か ら の 入力 


目 機 能 
キー ボー ド か ら の 入力 を 行なう 
目 書 式 


INPUT [ :] [” プ ロン プ ト 文 字 列 ” {: |,)] 変数 リス ト 


時 引数 と オプ ショ ン 






CE レン ルン レン 






INPUT の すぐ 後に セ も ミコ ロン を 書く 〈 と 、 入 力 後 も カー ソ 
ル は 同じ 行 に 留まる 。 
入力 用 プロ ンプ ト を 表示 し た いと き に 指定 する 。 
プロ ンプ ト の 後に セミ コロ ン を 書 〈 と" ? "マー ク を 表示 
し 、 カ ンマ を 書く と" ? "マー ク を 表示 し な い 。 

入力 し た い 変 数 を 指定 する 。 









プロ ンプ ト 文 字 列 









変数 リス ト 





時 文例 ① 





TNPUT "Car name = ": aName$ 
PRINT "Price = ": : INPUT amount 





1e4 


財 文 例 @ 


TYPE productRecType 
itName AS STRING * 10 
amount AS INTEGER 
END TYPE 

DTM car AS productRecType 


INPUT : " Car name = ", car・.1tName 
TNPUT " and amount = " , car.amount 





圏 ノー ト 

y 入力 は 、 改行 キー( リ ター ン ・ キ ー) を 押す こと に よっ て 確定 する 。 

p 変数 を 2 つ 以 上 指定 し た と き は 、 入 力 デ ー タ を カン マ で 区 切っ て 入力 する 。 
P 参照 ステ ー ト メン ト : LINE INPUT 
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INPUT # [ファ イル ] 


シー ケン シャ ル ・ フ ァイル か ら の 読み 込み 


_ 機能 
シー ケン シャ ル ・ フ ァイル や デバ イス か ら デ ー タ を 読み 込む 
邊 書式 


INPUT # フ ァイル 番号 , 変数 リス ト 


上 引数 











OPEN ステ ー ト メン ト で オー プン し た と き の フ ァイル 
番号 を 指定 する 。 


# フ ァイル 番号 





変数 リス ト 





上 文 例 





TYPE FoodRecType 
itName AS STRING * 10 
amount AS INTEGER 
END TYPE 

DIM fruit AS FoodRecType 


| 
| 
OPEN "Fruit.Dat" FOR INPUT AS 1 | 
| PRINT " NAME amount 『" 
PRTNT "ーーーーーーーーーーーーーーーーーーーーー 
DO WHILE NOT EOF(1 ) 
TNPUT #1, fruit.1itName , fruit.amount 
PRINT fruit.itNamei " = "ij USING "##」# ま ます" : Fruit.amount 
LOOP 
CLOSE 1 
END 


剛 ノ ー ト 
フィー ルド の 区 切り ("。 ご と に 変数 を 読み 込む 。 
p 参照 ステ ー ト メン ト : INPUT# 
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IOCTL 
デバ イス ・ ド ライ バー へ の 制御 デー タ の 送出 


_ 機能 
デバ イス ・ ド ライ バー へ 制御 デー タ を 送る 
骨 書 式 


IOCTL [ 講 ファ イル 番号 , 文字 列 


上 明 引数 














デバ イス ・ ド ライ バー を オー プン し た と き の フ ァイル 番 
号 を 指定 する 。 
制御 に 必要 な デー タ を 文字 列 に し て 指定 する 。 


ファ イル 番号 






由 文 例 








OPEN "\Driver\HardCopy" OUTPUT AS 1 
TOCPL 1。 230RD 作 | 





園 ノー ト 
『 参照 関数 : IOCTL$ 
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KEY 
ファ ンク ショ ン ・ キ ー の 割り 当て と 表示 


上 機能 

ファ ンク ショ ン ・ キ ー へ の 割り 当て を 行なう 。 キー 内 容 の スク リー ン 表 示 も 
行なえ る 。 
目 書 式 


KEY ({n, 文字 式 | LIST | ON | OFFj 









ファ ンク ショ ン ・ キ ー へ の 割り 当て を 行なう 。 
n と し て 1 一 10 を 指定 で き 、 文 字 式 は 15 文 字 ま で で ある 。 
ファ ンク ショ ン ・ キ ー の 一 覧 を 表示 する 。 
ファ ンク ショ ン ・ キ ー の 内 容 を スク リー ン の 最 下 行 に 表 
示す る 。 
ファ ンク ショ ン ・ キ ー の 内 容 を 表示 し な い 。 
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生 文 例 


CLS 

DIM menu$(1 TO 10) 

FOR ji = 1 TO 10 
READ menu$(i) 
KEY i, menu$(i) 

NEXT i 

KEY ON 


menuReSouroe: 
DATA New, Open, Save, Close,。 Quit 
DATA Enter, Edit, Find, Print,。 Undo 





く 表示 画面 > 
1New 2Open 3Save 4Close 5Quit 6Enter 7Edit 8Find 9Print 10Undo 


較 ノ ー ト 

p 文字 式 を 使っ て 、 ユ ー ザ ー 定 義 キ ー に つい て の マス ク 処 理 と スキャン を 行 な 
える 。 

P 参照 ステ ー ト メン ト : KEY(n) 
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KEY(n) 
キー の 割り 込み 


_ 機能 
任意 の キー の 割り 込み を 開始 また は 終了 する 
目 書 式 


KEY(n) (ON | OFF | STOP} 


由 引 数 と オプ ショ ン 







キー の 番号 を 指定 する 。 
キー・ イ ベン ト ・ ト ラッ ピン グ を 有効 に する 。 
有効 で ある あい だ 、ON TIMER(n) GOSUB ステ ー ト メ 
ント で 設定 し た 秒 数 が 経過 し た か どう か チェ ッ ク し 、 経 
過 し た と き は 、 そ の イベ ント ・ ト ラッ ピン グ の サ プ ル ー 
チン を 実行 する 。 
キー・ イ ベン ト ・ ト ラッ ピン グ を 無効 に する 。 
OFF は 、 そ の イベ ント を 記憶 し な い が 、STOP は 、 記憶 
し て いる の で トラ ッ ピ ング で きる よう に な る と ON 
KEY ルー チン を 実行 する 。 














STOP 


上 文例 





ン 


KEY 15, CHR$(&HO1+&H10 )+CHR$(&HO1 ) ” 。 ぜ ・ コ ー ヤ " ルス 生 ャ ン ・ コ エト" 
KEY(15) ON 
ON KEY(15) GOSUB ShiftCtr11 
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圏 ノ ー ト 
キー の 番号 は 、 つ ぎの よう に な っ て いる 。 





ベー ス と な る キー(SHIFT|、|CAPS|、| カナ |、|GRPH|、 | CTRL |) な ど が 押 
され て いる か どう か は 、 つ ぎの マス ク ・ コ ー ド に て 識別 で きる 。 2 つ 以 上 の と 
き は 、 そ れ ら の コー ド を 加え れ ば よい 。 








マス ク な し 
SHIFT | キー 
CAPS | キー 


GRPH| キー 








キー・ ス キャ ン ・ コ ー ド に つい て 付録 を 参照 し て くだ さい 。 
『 参照 ステ ー ト メン ト : KEY、ON event GOSUB 
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KILL 
ファ イル の 消去 


機能 
ディ スク 上 の ファ イル を 消去 する 
目 書 式 


KILL ファ イル 名 


嘆 引数 





ファ イル 名 


邊 文例 





本 LL "SETTTNG.BAK" 


\ 








時 ノー ト 
y MS-DOS の DEL お よび ERASE コマ ンド と 同じ 機能 を も っ て いる 。 
mp ファ イル 名 の 指定 に ワイ ルド ・ カ ー ド が 使え る 。 
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KMID$ 
文字 列 の 置き 換え 


機能 

文字 列 変数 の 一 部 を 他 の 文字 列 で 置き 換え る 。 1 バイ ト 文 字 と 2 バイ ト 文 字 
を 混在 で きる 。 
肖 書 式 


KMID$( 文 字 列 変数 , 開始 位置 [, 文字 数 ]) = 文字 式 


時 引数 と オプ ショ ン 





IE:4 レ コン ルン レク 
文字 列 変数 









置き 換え の 対象 と な る 文字 列 変数 を 指定 する 。 


置き 換え の 対象 と な る 部 分 文字 列 の 最初 に 位置 を 指定 す 
る 。 


置き 換え の 対象 と な る 部 分 文字 列 の 長 さ を その バイ ト 数 
で 指定 する 。 


新しく 置き 換え る 文字 列 を 指定 する 。 

















貼 文例 
1 ee elso en 5 2 証 ゃ Ai 打 so の nas ss | 
o1dString$ = "QuickBASIC(version 4 . 20)" 
」 MID$(o1dString$, 6, 5) = "BASTIC" 
PRINT ol1dString$ ) "Quic kBASIC(version 4. 20 )" に な る 。 
圏 ノー ト 


"文字 数 "を 省略 する と 、" 文 字 式 " の 長 さ を 指定 し た こと と 同じ に な る 。 

"文字 数 "が "文字 式 " の 長 さ より も 短い な ら ば 、 そ の 文字 数 だ け 置 き 換 わる 。 
"文字 数 "が "文字 式 " の 長 さ より も 長い な ら ば 、 そ の 文字 式 の 長き さだ け 置 き 換 わる 。 
P 参照 ステ ー ト メン ト : MID$ 
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LET 
変数 へ の 代入 
機能 
変数 に 値 を 代入 する 


是 書 式 


[LET] 変数 = 式 


時 引数 と オプ ショ ン 


代入 し た い 変 数 を 指定 する 。 


変数 に 代入 し た い 定数 、 変 数 、 ま た は 式 を 指定 する 。 





時 文例 ① 


DIM month( 12 ) 
corpName$ = "株 式 会 社 ABC" 
| month(5) = 42000 
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邊 文例 @ 





TYPE aPersona1RecordType "ユー ザー 定義 型 
firstName AS STRTNG * 10 
secondName AS STRTNG * 10 
age AS TNTEGER 
phone AS STRTNG * 12 
END TYPE 


DIM user AS persona1RecordType 
LET user.firstName = "Bi11" 


LET user.secondName = "Evans" 
LET user.age = 42 ] 





LET user.phone = "03(291)1257" 








圏 ノ ー ト 
LET は 省略 で きる 。 
ユー ザー 定義 型 の 変数 に 代入 する と き 、 文 例 ② の 変数 名 は 、 レコ ー ド 型 変数 名 と そ 
の 型 の 要素 名 (firstName, age な ど ) と を ". "で つなぐ 。 

レコ ー ド 型 宣言 名 . 要素 名 
放 同じ タイ プ の ユー ザー 定義 型 の 変数 全体 を 代入 する と き は 、 要 素 名 を 省略 で 
きる 。 
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LINE 
線 ・ ポ ックス の 描 図 


_ 機能 
スク リー ン の 線 ま た は ボッ クス を 描く 
邊 書式 


LINE [[STEP] (x1, y1)] - [STEP] (x2,y2) 
[, [カラ ー] [, [B | BF] [, スタ イル ]]] 


財 引 数 と オプ ショ ン 

IE: コレ アン ルク 機能 

STEP 現在 の グラ フィ ッ ク ・ カ ー ソ ル の 位置 か ら 相対 的 に x、y 
の 座標 を 決め た いと き に 指定 する 。 

(x1, y1) 線 の 両端 の 座標 また は ボッ クス の 対 角 座 標 を 指定 する 。 

(x2, y2) 

Po 線 ま た は ボッ クス を 描く と き の カ ラー を 指定 する 。 

B B は 、 座 標 の 指定 が ボッ クス の も の で ある こと を 指定 す 
る 。 

BF BF は 、 ボ ックス で か つ そ の 内 部 を カラ ー て 塗り つぶ す 
こと を 指定 する 。 

スタ イル 線 の スタ イル を 16 ビ ッ ト (2 バ イト ) の ビッ トバ パタ ー ン で 


指定 する 。 
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上 文例 


LINE (50, 100)-(200, 300), , B,&H1010 





圏 ノー ト 

ぁ 座標 の 指定 は 、(x1,。 y1) と (x2、y2) の どちら に 行なっ て も 同じ で ある 。 
スタ イル の ビッ ト ・ パ ター ン は 、 ビ ッ ト が 1 な ら ば その ピク セル を 表示 し 、0 
な ら ば 表示 し な い 。 

『 参照 ステ ー ト メン ト : SCREEN 
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LINE INPUT 
キー ボー ド か ら の 入力 


目 機 能 

区 切り 文字 の 有無 に 関係 な く 、 キ ー ボ ー ド か ら 入 力 さ れる も の 全体 を 1 つの も 
の と し て 文字 列 変数 に 入力 する 
目 書 式 


LINE INPUT [ :] [" プ ロン プ ト 文 字 列 " : ] 文字 列 変数 


財 引 数 と オプ ショ ン 
GE: レア ルン レス 


INPUT の すぐ 後に セミ コロ ン を 書 〈 と 、 入 力 後 も カー ソ 
ル は 同じ 行 に 留まる 。 


プロ ンプ ト 文 字 列 | 入力 用 プロ ンプ ト を 表示 し た いと き に 指定 する 。 
文字 列 変数 入力 し た い 文 字 列 変数 を 指定 する 。 





目 文 例 


earm ギ ーーーー ーーー 





LINE INPUT "Your address ? " anAddress$ 





圏 ノー ト 

"2 ウマ ー ク は 表示 し な い 。 

p 最大 255 文 字 ま で 入力 可能 で ある 。 
p 参照 ステ チー トメント : INPUT 
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LINE INPUT 』# 
シー ケン シャ ル ・ フ ァイル か ら の 読み 込み 


機能 

区 切り 文字 の 有無 に 関係 な く 、 シ ー ケ ン シ ャ ル ・ フ ァイル か ら デ ー タ を 文字 
列 変数 に 読み 込む 
邊 書式 


LINE INPUT # フ ァイル 番号 , 文字 列 変数 


由 引 数 









# フ ァイル 番号 OPEN ステ ー ト メン ト で オー プン し た と き の フ ァイル 
番号 を 指定 する 。 


読み 込む デー タ を 格納 する 文字 列 変数 を 指定 する 。 








文字 列 変数 








時 文例 

証 

OPEN "Fruit.Dat" FOR INPUT AS 1 
PRINT " N AME amount " 
PRTNT "ーーーーーーーーーーーーーーーーーーーーー 0 


DO WHILE NOT EOF( 1 ) 
LINE INPUT #1, oneRecord$ 
PRINT oneRecord$ 

LOOP 

CLOSE 1 

END 














層 ノ ー ト 
フィー ルド の 区 切り ", "に 関係 な く 、 レ コー ド の 区 切り (&&H0D, HOA) ま 
で を 1 つの 変数 に 読み 込む 。 
P 参照 ステ チー トメ ント :INPUT # 
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LOCATE 


カー ソル 制御 
_ 機能 
テキ スト ・ カ ー ソ ル の 移動 を 行ない 、 表 示 の 有無 を 決め 、 お よび 形状 を 設定 
する 。 
時 書式 


LOCATE [ 行 ][, [ 桁 ] 
[, [カー ソル ] [, [スタ ー ト ] [, スト ッ プ ]]]] 


オプ ショ 


3 








移動 し た 行 (1 一 25) を 指定 する 。 
移動 し た 桁 (1 一 80) を 指定 する 。 
表示 の 有無 を 指定 する 。1 な ら ば 表示 し 、0 な ら ば 表示 し 
な い 。 


カー ソル の 形状 を ピク セル 行 の 範囲 で 設定 する 。 
ビク セル 行 番号 













スト ッ プ 


0 。 回 右 画 

1 硬 還 

2 。 画面 品 

3 | 胃 | 1 

4 回 較 錦 

5 。 画 遼 因 1 つの カー ソル は 
6 画 画 3 

7 。 画 較 硬 横 8 ピク セル 
9 全 二 語 。 縦 16 ビ クセ ル 
10 画 画 「」 NE い 
11 画 大 画 か ら で き て いる 
12 回 右 1I 

13 画 画 

14 画 一 LI 

15 画 右 著 
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上 文例 


LOCATE 20, 1 
TINPUT "Your name ? "。 aName$ 


LOCATE 20,。 1。 1」14。 15 
INPUT "Your name ? "、 aName$ 





軸 ノ ー ト 

P 各 オ プシ ョ ン を 省略 する と それ ぞ れ その と き の 設 定 に な る 。 

p "ストップ "を 省略 する と "スタ ー ト "と 同じ ピク セル 行 を 指定 し た こと に な る 。 
"スト ッ プ "が "スタ ー ト "より も 小さ いな ら ば 、 カ ー ソ ル の 形状 は 反転 する 。 
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LOCK 
ファ イル ・ ア クセ ス の ロッ ク 


_ 機能 

ネッ トワ ー ク の も と で オー プン され て いる ファ イル に 対す る アク セス を ロッ 
ク す る 
邊 書式 


LOCK [ 衣 ファ イル 番号 
[, {レコ ー ド | [開始 位置 ] TO 終了 位置 )] 


邊 引数 と オプ ショ ン 








LE ッ 4 レア ルン 時 
ファ イル 番号 





ロッ ク し た い フ ァイル の 番号 を 指定 する 。 
ロッ ク し た い レ コー ド ま た は バイ ト 位 置 を 指定 する 。 


ロッ ク し た い 男 囲 を レコ ー ド また は バイ ト 位 置 で 指定 す 
る 。 


時 文例 





「 Lock れ 1 TO 100 
LOCK #2 





田 ノ ー ト 

を ラン ダム アク セス ・ フ ァイル で は 、 レ コー ド 番 号 で 行なう 。 

バイ ナリ ー・ フ ァイル で は 、 バ イト 位置 で 行なう 。 

シー ケン シャ ル ・ フ ァイル で は 、 フ ァイル 全体 が ロッ ク さ れる 。 
ファ イル 番号 だ け を 指定 する と 、 フ ァイル 全体 を ロッ ク す る 。 

"TO 終了 位置 "だ け を 指定 する と 、 フ ァイル の 先頭 か ら そ こま で を ロッ ク す る 。 
ぁ 参照 ステ ー ト メン ト : UNLOCK 
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LPRINT 
プリ ンタ ー 印 字 


上 機能 
プリ ンタ ー に デー タ を 印字 する 
呈 書 式 


LPRINT [USING 書式 制御 文字 列 : ] 
[ 式 リ スト ] [|: 有 


慎 引 数 と オプ ショ ン 
JE コレ ロア ルン ンク 





書式 制御 文字 列 | 式 の 値 の 表示 形式 や 位置 を 制御 し た いと き に 使う 。 
重文 字 列 の 表示 
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生 数 値 の 印字 

制御 文字 機能 
右 詰 めで 印字 する 。 

カン マ を 印字 する 。 

先頭 に \ を 付け る 。 

空白 部 分 を * で 埋め る 。 
小数 点 を 印字 する 。 

符号 を 先頭 また は 末尾 に 印字 する 。 
ー を 先頭 に 印字 する 。 

に was 


CC 


て る 。 


式 リス ト 印字 し た い 値 を 指定 する 。 
式 は 、", "また は " : "で 区 切る 。 


財 文 例 ① く 印 字 結果 > 


LPRTNT "Quick" "BASTC" | 
LPRTNT "Quick"i"BASTC" ks BASTC 
3 QuickBASTC 


し PE 
LRTNT TO QuickBASIC 











正文 例 @ ぐ 印 字 結 果 > 

1 ) 褒 和 
LPRTNT USING "@BASIC"』 "Quick" QuickBASTC | 
LPRINT USING "& &BASIC": "Quick" QuiBASTC | 
LPRINT USTNG "!BASTC" 』 "Quick" QBASIC 
LPRINT USING 「#### ま ##### 円 ": 4200 4200 円 
LPRINT USING "##」 を # ま 」### 円 ": 4200 4,200 円 
LPRINT USING "\\,」###」###"「: 4200 \4,200 
LPRINT USING "キネ 」###。###「: 4200 キネ *※ 本 4.200 
LPRINT USTNG "QucikBASIC(#.##): 4.2 QucikBASTC( 4 .20 ) 
LPRINT USING "+#.##": ー4.2 -4.20 
LPRINT USTNG "#.## き "ュー4.2 4.20- 
LPRINT USING "#. ま の" 4.2 0.4E+01 

5 








LPRINT USTNG "###### す 」#": 420000000 %420,000,000 
LPRINT USING "#.# ま "3。 5.7: .38 3.10 5.70 0.38 
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較 ノ ー ト 

P 引数 お よび オプ ショ ン を 省略 する と 改行 する 。 

ステ ー ト メン ト の 最後 に ", "また は ”: "を 付け る と 改行 し な いで 次 の 表示 を 
行なう (USING で は ”: "だ け 使え る )。 

y USING を 使わ な い 式 リス ト 中 で の 式 は 、 等 間隔 な 印字 を 行なう に は ”, "で 区 
切り 、 ま た は 続け て 印字 する に は ”: "で 区 切ら な けれ ば な ら な い 。 

USING を 使っ た 式 リ スト 中 で の 式 は 、" : "で 区 切ら な けれ ば な ら な い 。 
P"。 "は 、" お の 中 に 1 つ あ れ ば 3 桁 ご と に 区 切る こと が で きる 。 

p オバ ー フ ロー する と 先頭 に "%” が 印字 され る 。 

p 1 つの 書式 制御 文字 列 で は 、 2 つ 以 上 の 式 を 同じ 書式 で 印字 で きる 。 

p 書式 制御 文字 列 に は 、 文 字 列 変数 が 使え る 。 
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LSET 
文字 変数 へ の 左 詰め 代入 


時 機能 
文字 列 変数 に 左 詰め で 代入 する 。 
目 書 式 


LSET 文字 列 変 数 = 文字 式 


目 引 数 








文字 列 変数 文字 列 変数 や ラン ダム アク セス ・ バ ッ フ ァ の 変数 を 指定 
する 。 


左 詰め に し た い 値 の 文字 式 を 指定 する 。 












文字 式 


目 文 例 





[ OPEN "Fruit.Dat" FOR RANDONM AS 1 LEN = 12 
FIELD #1, 10 AS nameFld$, 2 AS salesF1d$ 











recNum = 1 
TNPUT : " Fruit (<cr> for EXIT) = "。 itName$ 
IF itName$ = "" THEN 
EXIT DO 
END IF 
TINPUT " 。 amount = "。 amount% 
LSET nameF1d$ = itName$ 
RSET salesF1d$ = HKI$(amount%) 
PUT #1, recNum 
recNum = recNum + 1 
LOOP 
CLOSE 1 
| END 
中 ノー ト 


y FIELD バッ ファ に 数 値 を 書き 込む に は 、 MKI$、 MKL$、 NKS$、 MKD$ 関 
数 を 使っ て 文字 列 に し て か ら 行 な う 。 
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MID$ 
文字 列 の 置き 換え 


目 機 能 
文字 列 変数 の 一 部 を 他 の 文字 列 で 置き 換え る 
目 書 式 


MID$( 文 字 列 変数 , 開始 位置 [, 文字 数 ]) = 文字 式 

















過 引 数 と オプ ショ ン 
> オレ アルン レス 
文字 列 変 数 置き 換え の 対象 と な る 文字 列 変数 を 指定 する 。 
置き 換え の 対象 と な る 部 分 文字 列 の 最初 に 位置 を 指定 す 
る 。 
置き 換え の 対象 と な る 部 分 文字 列 の 長き さき を その バイ ト 数 
で 指定 する 。 
新しく 置き 換え る 文字 列 を 指定 する 。 
文例 
ie 9 HH | 
MID$(o1dString$, 12, 7) 日 W ョ ン リ 
PRINT oldString$ ! "QuickBASTc パー ション 4.20" に な る 
還 ノ ー ト 


7 文字 数 "を 省略 する と 、" 文 字 式 "の 長 さ を 指定 し た こと と 同じ で ある 。 
"文字 数 "が "文字 式 " の 長 さ より も 短い な ら ば 、 そ の 文字 数 だ け 置 き 換 わる 。 
p "文字 数 "が "文字 式 " の 長 さ より も 長い な ら ば 、 そ の 文字 式 の 長 さだ け 置 き 換 
わる 。 

p 参照 テー トメ ント : KMID$ 
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MKDIR 


新しい サブ ・ デ ィ レ クト リ の 作成 
_ 機能 
ディ スク 上 に 新しい サブ ・ デ ィ レ クト リ を 作る 
目 書式 


MKDIR バス 名 


骨 引 数 





作成 し た い パ ス 名 を 文字 式 で 指定 する 。 


時 文例 





/ Ce 
MKDTR "MATLING" 
thePath$ = "B:\MODULES\DOSCALL" 
| MKDIR thePath$ 





國 ノ ー ト 
pm ディ レク トリ の 変更 は 、CHDIR ステ ー ト メン ト を 使う 。 
p ディ レク トリ の 削除 は 、RMDIR ステ ー ト メン ト を 使う 。 
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NAME 
ファ イル 名 の 変更 / フ ァイル の 移動 


目 機 能 

パス の 指定 が 同じ な ら ば 、 デ ィ ス ク 上 の ファ イル の 名 前 を 変更 する 。 ま た パ 
ス の 指定 が 異な る な ら ば 、 フ ァイル の 移動 を 行なう 。 

邊 書式 


NAME 旧 フ ァイル 名 AS 新 フ ァイル 名 


周 引 数 










旧 フ ァイル 名 
新 フ ァイル 名 





変更 する 前 の ファ イル 名 を 指定 する 。 
変更 し た 後 の フ ァイル 名 を 指定 する 。 





上 文例 





NAME "PRINTING.BAS" AS "LTSTTNG.BAS" 





圏 ノー ト 

y " 旧 フ ァイル 名 "は 、 必 ず 存在 し て いな けれ ば な ら ず 、 ま た 逆 に " 新 フ ァイル 名 " 
と 同名 の ファ イル は 、 す で に 存在 し て いて は いけ な い 。 

放 / 旧 ファ イル 名 "と " 新 フ ァイル 名 "の 指定 で 、 パ ス 名 が 同じ だ と 同じ ディ レク 
トリ 内 で その 名 前 を 変更 し 、 パ ス 名 が 別 の と き は その ファ イル を 移動 する 。 
pm オー プン 中 の ファ イル に つい て は 変更 で き な い (ERR =55) 。 

放 別 の ディ スク 間 で は 行え な い (ERR =74) 。 

wm ファ イル 名 の 指定 で ワイ ルド ・ カ ー ド は 使え な い (ERR =36)。 
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ON ERROR GOTO 
エラ ー 処 理 ルー チン の 開始 行 の 指定 


_ 機能 

エラ ー が 発生 し た と き に 使う エラ ー 処 理 ル ー チ ン の 開始 行 を 指定 する 。 また 
ェ ラ ー 処 理 を 行わ な いよ うに も で きる 。 
邊 書式 


ON ERROR GOTO { 行 番 号 | 行 ラ ベル } 


時 引数 






エラ ー 処 理 ル ー チ ン の 開始 行 を 行 番号 また は 行 ラ ベル で 
指定 する 





時 文例 





ON ERROR GOTO ErrorHand1leRoutine 
ErrorHandleRoutine: 
ERROR ERR 


RETURN 
ー ン 





較 ノ ー ト 

p 行 番号 と し て 0 を 指定 する と 、 エ ラー が 発生 し て も エラ ー 処 理 を 行なわ な い 
(プロ グラ ム は その 時 点 で 止ま っ て し まう )。 

y エ ラー 処理 ルーチン は 、 モ ジュ ー ル ・ レ ベル の コー ド と し て 書か な けれ ば な 
ら な い 。 


ド 参照 関数 : ERR、ERL 
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ON event GOSUB iza 
イベ ント ・ ト ラッ プ 用 サブ ・ ル ー チ ン の 開始 行 の 指定 


下 機 能 
イベ ント ・ ト ラッ プ の 分 岐 先 で ある サブ ・ ル ー チ ン の 開始 行 を 指定 する 。 
邊 書式 


ON イベ ント GOSUB  { 行 番号 | 行 ラベ ル } 


目 引 数 






イベ ント の 種類 を 指定 する 。 
種類 イベ ント 


COM(n) 通信 イベ ント 。n は 、 通 信 ポ ー ト (1, 2) を 
指定 する 。 
KEY(n) キー・ イ ベン ト 。 n は 、 キ ー の 番号 を 指定 
kr 成っ 
2 
タイ ム ・ イ ベン ト 。 n は 、 経過 秒 数 を 指定 
する 。 


演奏 イベ ント 。n は 、 バ ッ ク グ ラン ドミ ュ 
分 岐 先 を 行 番号 また は 行 ラ ベル で 指定 する 。 




















ー ジ ッ ク の キュ ー に お ける 最小 音符 数 
(1 一 32) を 指定 する 。 
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時 文例 









TIMER ON 
ON TIMER( 5 ) GOSUB skipToNext 
DO 

LOOP 


skipToNext: 
TTMER OFF 





圏 ノ ー ト 
P 参照 ステ ー ト メン ト : COM(m)、KEY(m)、TIMER 


ON.…GOSUB 


サブ ・ ル ー チ ン へ の 分 岐 


上 機能 
式 の 値 に 基づい て それ ぞ れ の サブ ・ ル ー チ ン へ 分 岐 する 


目 書 式 


ON 式 GOSUB { 行 番号 リス ト | 行 ラ ベル ・ リ スト } 


時 引数 







分 岐 し た い リ スト 上 の 値 に な る 式 を 設定 する 。 
行 番号 リス ト 分 岐 し た い サ ブ プルー チン の 行 番号 また は ラベ ル を 指定 す 


また は る 。 
行 ラ ベル ・ リ スト | 行 番号 は 、0 か ら 65529 の 範囲 で な けれ ば な ら な い 。 









量 文 例 





oe 
INPUT "Menu No. ? ( 1 - 5 ) ", menuNo 
TF (menuNo >= 1) AND (menuNo <= 5) THEN 
ON menuNo GOSUB Enter, Edit, Delete, Find, Listing 
) 。 menuNo = 1 * に 導 た 
ELSE 
PRINT "Bad Menu No ! 0 7 
GOTO GetMenuNumber 
END IF 


Enter: ) menuNo = 1 











第 3 章 @ ス テー トメ ント ーー153 





時 ノー ト 
式 の 値 は 、 整 数 値 と し て 評価 され る 。 


p 行 番号 リス ト ま た は 行 ラ ベル ・ リ スト は 、 式 の 値 1、2、3... に 対応 し て 分 岐 
する 。 


p 行 番号 リス ト ま た は 行 ラ ベル ・ リ スト 中 に 、 式 の 値 に 対応 する も の が な けれ 
ば 、 そ の ON..GOSUB の 次 の ステ ー ト メン ト を 実行 する 。 
p 参照 ステ ー ト メン ト : ON.…GOTO、SELECT 
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ON.…GOTO 


行 へ の 分 岐 


目 機能 
式 の 値 に 基づい て それ ぞ れ の 行 へ 強制 的 に 分 岐 する 
目 書 式 


ON 式 GOTO { 行 番号 リス ト | 行 ラ ベル ・ リ スト } 


財 引 数 と オプション 






分 岐 し た い リ スト 上 の 値 に な る 式 を 設定 する 。 


行 番号 リス ト 分 岐 し た い 行 番号 また は ラベ ル を 指定 する 。 
行 ラ ベル ・ リ スト | 行 番号 は 、0 か ら 65529 の 範囲 で な けれ ば な ら な い 。 










時 文例 









GetMenuNumber: 
INPUT "Menu No. ? ( 1 - 5 ) "。 menuNo 
IF (menuNo >= 1) AND (menuNo <= 5) THEN 
ON menuNo GOTO Enter,。 Edit, Delete, Find, Listing 
) 。 menuNo = 1 wp 放 se 計 「 Pa 
ELSE 
PRINT "Bad Menu No 0 
GOTO GetMenuNumber 
END IF 















Enter: menuNo = 1 





GOTO GetMenuNumber 


軒 ノ ー ト 
p 参照 ステ ー ト メン ト : ON..GOSUB、 SELECT 
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OPEN 
ファ イル の オー プン 


_ 機能 

ディ スク 上 の ファ イル また は デバ イス を オー プン し て 入出 力 で きる よう に す 
る 
邊 書式 


(① OPEN ファ イル 名 [FOR モー ド ] 
[ACCESS アク セス ] [ロッ ク ] AS [ ファ イル 番号 
[LEN = レコ ー ド ・ サ イズ ] 


② OPEN モー ド ,[ 訂 ファ イル 番号 , ファ イル 名 
[, レコ ー ド ・ サ イズ ] 


時 引数 と オプ ショ ン ( 書 式 ①) 






ファ イル 名 オー プン し た い フ ァイル の 名 前 を 指定 する 。 
つき ぎの 中 か ら フ ァイル の タイ プ を 指定 する 。 


1 


INPUT 


OUTPUT 
APPEND 


RANDOM 
BINARY 
















シー ケン シャ ル ・ フ ァイル か ら 読 み 込 む 。 





シー ケン シャ ル ・ フ ァイル へ 書き 出す 。 フ ァ イ 
ル の 先頭 か ら 書 き 出 す 。 


シー ケン シャ ル ・ フ ァイル へ 書き 出す 。 フ ァ イ 
ル の 終わ り に 追加 する 。 


ラン ダム アク セス ファ イル を オー プン 。 
バイ ナリ ー・ フ ァイル と し て オー プン 。 
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アク セス ファ イル へ の アク セス の 仕方 を 指定 する 。 
3 
読み 込み だ け を 行なう 。 
WRITE | 書き 出し だ け を 行なう 。 
READ WRITE の 両方 を 一 度 に 指定 で きる 。 
ロッ ク ネッ トワ ー ク 環境 で の アク セス を 制御 する 。 
の 能 
共有 させ る 。 


LOCK READ | 最初 に リー ド ・ ア クセ ス の あっ た 
プロ セス の み に 以 後 の リ ー ド ・ ア 
クセ ス を 許す 。 

LOCK WRITE | 最初 に ライ ト ・ ア クセ ス の あっ た 
プロ セス の み に 以 後 の ラ イト ・ ア 
クセ ス を 許す 。 

LOCK READ | 最初 に リー ド ・ ま た は ライ ト ・ ア 

WRITE クセ ス の あっ た プロ セス の み に 以 

後 の ア クセ ス を 許す 。 

タイ プ を 省略 する と オー プン し て いる と き は 、 他 の プロ 

セス か ら の アク セス を 禁止 する 。 


ファ イル 番号 オー プン し た ファ イル に 割り 当て る 番号 を 指定 する 。 オ 
ー プ ン 済 み フ ァイル の 指定 は 、 こ の 番号 を 使う 。 


の グセ ビ 基 
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レコ ー ド ・ サ イズ | オー プン する ファ イル の タイ プ の レコ ー ド 長 を 指定 する 。 


省略 可能 
デフ ォ ル ト の バッ ファ ・ サ イズ は 、 
512 バ イト に な っ て いる 。 
1 レコ ー ド の バイ ト 数 を 指定 する 。 
デフ ォ ル ト の バッ ファ ・ サ イズ は 、 
128 バ イト に な っ て いる 。 


シー ケン シャ ル 











上 文例 








TYPE FoodRecType 
itName AS STRING * 10 
amount AS INTEGER 
END TYPE 

DIM fruit AS FoodRecType 


OPEN "Fruit.Dat" FOR RANDOM AS 1 LEN = LEN(fruit ) 
recNum = 1 
PRINT " NAME amount 『" 
PRTNT "ーーーーーーーーー ニ ーーーーーーーーーーーー 4 
DO 
GET #1, recNum,。 fruit 
IF EOF( 1 ) THEN 
EXIT DO 
END IF 
PRINT fruit.itNamei " = ": USING 「##」# き ます : fmuit.amount 
recNum = recNum + 1 
LOOP 
CLOSE 1 
END 











庄 ノ ー ト 
p モー ド の デフ ォ ル ト は 、”"RANDOM" に な っ て いる 。 
y 未 使用 の つ フ ァイル 番号 は 、FREEFILE 関数 で 知る こと が で きる 。 
pp ラン ダム ・ ア クセ ス ・ フ ァイル お よび バイ ナリ ー・ フ ァイル で "アク セス "を 
指定 し な いと 、 つ ぎの 順番 で アク セス され ます 。 
1 READWRITE 2 WRITE 3 READ 
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目 引数 と オプ ショ ン (書式 @) 
IE>2 レ アン キク 3 能 
モー ド つぎ の 中 か ら フ ァイル の タイ プ を 指定 する 。 

モー ド  。 ファ イル 
シー ケン シャ ル ・ フ ァイル か ら 読 み 込む 。 
シー ケン シャ ル ・ フ ァイル へ 書き 出す 。 
ファ イル の 先頭 か ら 書 き 出 す 。 


シー ケン シャ ル ・ フ ァイル へ 書き 出す 。 
ファ イル の 終わ り に 追加 する 。 


ラン ダム ・ ア クセ ス ・ フ ァイル を オー プ 
ン す る 。 


バイ ナリ ー・ フ ァイル と し て オー プン する 。 


ファ イル 番号 オー プン し た ファ イル に 割り 当て る 番号 を 指定 する 。 
オー プン 済み ファ イル の 指定 は 、 こ の 番号 を 使う 。 


ファ イル 名 オー プン し た い フ ァイル の 名 前 を 指定 する 。 
レコ ー ド ・ サ イズ | オー プン する ファ イル の タイ プ の レコ ー ド 長 を 指定 する 。 
レル 5 レコ ー ド ・ サ イズ 


シー ケン シャ ル | 省略 可能 

デフ ォ ル ト の バッ ファ ・ サ イズ は 、 

512 バ イト に な っ て いる 。 

ラン ダム 1 レコ ー ド の バイ ト 数 を 指定 する 。 
デフ ォ ル ト の バッ ファ ・ サ イズ は 、 
128 バ イト に な っ て いる 。 
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邊 文例 @ 


TYPE FoodRecType 
itName AS STRING * 10 
amount AS INTEGER 
END TYPE 

DIM fruit AS FoodRecType 


OPEN "R"。 1。 "Fruit.Dat" 。 LEN(fruit) 
recNum = 1 
PRINT " N AME amount 『" 


DO 
GET #1、。 recNum。 
IF EOF( 1 ) THEN 
EXIT DO 
END IF 
PRINT fruit.itNamei " = ": USTNG "##。###" fruit.amount 
recNum = recNum + 1 
LOOP 
CLOSE 1 
END 





較 ノ ー ト 
p 参照 スチ テー トメ ント : GET #、PUT #、FIELD、CLOSE 
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OPEN "COMn 7 


通信 用 チャ ン ネ ル の オー プン 


邊 機能 
通信 用 の チャ ン ネ ル を オー プン する 
邊 書式 
OPEN "COMn : オプ ショ ン ・ リ スト 1 オプ ショ ン ・ リ スト 2? 
[FOR モー ド ] AS [ ファ イル 番号 
[LEN = レコ ー ド ・ サ イズ ] 


生 引 数 と オプ ショ ン 





IE ッ ル < レン ルン キン 







通信 の パラ メー タ に つい て 設定 する 。 
[ボーレート][, [パリ ティ ー][, [ビッ ト 長 ][, [スト ッ プ * ビ ッ ト ]]]] 
† † ag † 






オプ ショ ン ・ リ スト 1 






75-9600 
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オプ ショ ン ・ リ スト 2 


制御 の た め の オ プシ ョ ン 設 定 を する 。 

し ア トン 計っ 栖 能 

ASC ASCII モー ド と し て オー プン する こと 
に より 、 つ ぎの こと を 行なえ る 。 
※ タ プ を スペ ー ス に 置き 換え る 
※ 行 末 に CR(&H0D, &H0A) を 付け る 
※&H1A を EOF と し て 認識 する 
※ XON/XOFF を 可能 に する 


バイ ナリ ー・ モ ー ド と し て オー プン する 
こと に より 、 つ ぎの こと を 待 な える 。 

※ タ プ を スペ ー ス に 置き 換え な い 

※ 行 末 に CR を 付け な い 

※&H1A を EOF と し て 認識 し な い 


CD [0] CD を 制御 する 

CS [0] CTS を 制御 する 

DS [m] DSR を 制御 する 

LF 通信 内 容 を プリ ント する 

OP [m] | 待ち 時 間 を 設定 する 。 

RB [n] 受信 バッ ファ の サイ ズ を 設定 する 。 
RTS を 制御 する 。 


※ オ プシ ョ ン は 、 カ ンマ で 区 切る 。 
※ m の 単位 は 、 ミ リ ・ セ カン ド で ある 。 





オー プン の 仕方 を 指定 す る 。 


NN 






INPUT シー ケン シャ ル ・ フ ァイル 入力 
OUTPUT | シー ケン シャ ル ・ フ ァイル 出力 
ラン ダム アク セス 入出 力 
ファ イル 番号 オー プン 時 の ファ イル 番号 を 指定 する 。 


レコ ー ド ・ サ イズ | ラン ダム アク セス ・ バ ッ フ ァ ・ サ イズ を 指定 する 。 
省略 する と 128 バ イト に な る 。 





















征 文 例 


OPEN "COM1:1200,N,8,1,BTN" AS 1 











圏 ノー ト 
ド 参照 ステ ー ト メン ト : COM(n)、ON event GOSUB 
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OPTION BASE 


配列 変数 に お ける 添字 の 下限 の 設定 
_ 機能 
配列 変数 に お ける 添字 の 下限 を 設定 する 
邊 書式 


OPTION BASE 最小 値 


由 引 数 





目 文 例 





OPTTON BASE 1 
DIM lastDay(12) AS INTEGER 
OO 長 , 導 = 1 WO 12 
| READ LastDay(n ) 
NEXT n 





DARA 39。 28, 31。 30j、31 ,。 30。 31, 31、 30、 31。 30, 9@1 | 
| 





圏 ノー ト 
pp デフォ ルト の 下限 は 、 0 に な っ て いる 。 
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OUT 
入出 力 ポ ー ト へ の デー タ の 送出 


電機 能 
入出 力 ポ ー ト に 1 バイ ト の デー タ を 送る 
邊 書式 


OUT ポー ト 番 号 , デー タ 


骨 引 数 





目 文 例 





an &HAB, &H20 








圏 ノー ト 
『 参照 関数 INP 
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PAINT 
グラ フィ ッ ク 領 域 の 塗り つぶ し と パタ ー ン 埋め 


邊 機能 

任意 の グラ フィ ッ ク 領 域 を 指定 し た カラ ー で 塗り つぶ すか 、 ま た は パタ ー ン 
で 埋め る 
中 書式 


PAINT [STEP] (x, y) [, [ペイ ント 属性 ] 


目 引 数 と オプ ショ ン 

IE: ん < レア ルン レン 機 能 

STEP 現在 の グラ フィ ッ ク ・ カ ー ソ ル の 位置 か ら 相対 的 に x、y 
の 座標 を 決め た いと き に 指定 する 。 

xy 塗り つぶ し た い 領 域 に 含ま れる 座標 を 指定 する 。 

ペイ ント 属性 特定 の カラ ー て で 塗り つぶ し た いと き は その カラ ー の 属性 
番号 (数 字 ) で 指定 する 。 
ある 一 定 の パタ ー ン て 塗り つぶ し た いと き は 、 そ の パタ 
ー ン を 文字 式 で 指定 する 。 

境界 線 の カラ ー | 境界 線 の カラ ー を 属性 番号 で 指定 する 。 

背景 すでに 塗り つぶ され て いる 部 分 を 別 の パタ ー ン て 塗り つ 


ぶす た め の パ ター ン を 指定 する 。 
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上 文例 








row1$ = CHRS(&HO,。 &HF。 &HO, AHO ) 

row2$ = CHRS(&HO, &HFO, &HO, &HO ) 

row3$ = CHR$(&HO , &HFO, &HO, &HO) 

row4$ = CHR$(&HO。 &HF。 &HO, &HO) 
pixelPattern$ = row1$ + row2$ + row3$ + row4$ 
L1NE (100。 200)-(200。 300)。 , B 


PAINT (150。 250)。 pixelPattern$ 








弄 ノ ー ト 
p パターン の 作り 方 
※ パ ター ン は 、 タ イル を 並べ た 模様 に な る 。 
※1 つ の タイ ル は 8 ピク セル X 8 行 に な っ て お り 、 行 単位 で 定義 する 。 


(パタ ー ン ) (属性 ) 


ピク セル 
12345678 12345678 

1 行 目 画 男 遼 較 較 較 国 較 ロ < 青 
LLLIIIIII 
LLIIIIII bm 















































2 
3 口 ぐ 赤 
4 IIIIIIIII ロロ ロロ ロロ ロロ そ 郊 度 
5 LILLIIIIII 

6 

7 

8 


品 





























還 固 較 較 較 較 較 較 
LIL II IIIII 
固 固 間 国 較 較 国 較 

※ タ イル の 1 行 は 、 横 に 8 つの ピク セル を 並べ た も の で ある 。 この 1 行 は 4 バ 
イト の 文字 列 で 定義 むす る 。 1 バイ ト は 8 ビッ ト な の で 、 各 ビッ ト が ピク セ 
ル に 対応 し て いる 。 

※ 1 行 を 定義 むる た め の 4 バイ ト は 、 つ ぎの 属性 に な っ て いる 。 

CHR$ ( 青 ) CHR$ ( 緑 ) †CHRS ( 赤 ) +CHRS (輝度 ) 
まだ は 
CHRS ( 青 、 緑 、 赤 、 輝 度 ) 

1 行 は し 、 こ れ ら 4 つの 属性 を 重ね 合わ せ て 定義 され る 。 

※ 1 パタ ー ン の 定義 は 、 1 行 ( 4 バイ ト ) 単 位 で 行なえ る 。 1 行 だ け 定 義 する 
と その パタ ー ン が 残り の 行 に も 適用 され る の で 8 行 (32 バ イト ) 分 すべ て を 
定義 し な く て も よい 。 た だ し 。 背景 は 、2 行 ま で で ある 。 

p 参照 ステ ー ト メン ト : COLOR、LINE、CIRCLE 
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PALETTE 
バレ ッ ト ・ カ ラー の 設定 


目 機能 

パレ ッ ト の カラ ー 属 性 と カラ ー・ コ ー ド の 関係 を 設定 する 。1 つ ずつ 設定 する 
と き は 、 書 式 ① を 使い 、 一 度 に 全部 を 設定 し た いと き は 、 書 式 ② を 使う 。 
目 書 式 


①PALETTE 属性 , カラ ー 


② PALETTE USING 配列 名 [( イ ン デ ックス )] 


時 引数 と オプ ショ ン ( 書 式 ①) 


属性 と カラ ー・ コ ー ド と の 対応 テー ブル と し て 整数 型 ま 
た は 長 整数 型 の 配列 を 指定 する 。 

イン デック ス パレ ッ ト と し て 設定 する と き に どの 要素 か ら 始 め る か を 
指定 する 。 
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時 文例 ① 





PALETTE 1, 6 





目 文 例 @ 





CONST col1orMax = 16 
DPA OL お 2 DO 6 7 0 まさ 2 の 3 人 。 65 ボ 
DIM Picasso( 1 TO colorMax ) AS INTEGER 
FOR i = 1 TO colorMax 
READ setColorCode 


Picasso(i) = setColorCode 
NEXT 
PALETTE USING Picasso 


* 





圏 ノー ト 
カラ ー の 属性 番号 は 、 テ キス ト の カラ ー に は 影響 し な い 。 
p 使用 可能 な 属性 番号 は 、 接 続 で きる モニ ター の 種類 に よっ て 異な る 。 








カラ ー の 種類 は 、SCREEN ステ ー ト メン ト で 設定 する パレ ッ ト 番 号 に 依存 
する 。 


p デフォルト と し て 、 属 性 番号 は 、 カ ラー・ コ ー ド が 設定 され て いる 。 
ド 参照 ステ ー ト メン ト : SCREEN、COLOR 
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PCOPY 
スク リー ン ・ ペ ー ジ の コピ ー 


上 機能 
ある スク リー ン ・ ペ ー ジ を 別 の ペー ジ に コピ ー す る 
目 書 式 


PCOPY コピ ー 元 ペー ジ 番 号 , コピ ー 先 ペー ジ 番 号 


邊 引数 と オプ ショ ン 










コピ ー 元 ペー ジ 番 号 
コピ ー 先 ペー ジ 番 号 


コピ ー 元 の スク リー ン ・ ペ ー ジ 番号 を 指定 する 。 
コピ ー 先 の スク リー ン ・ ペ ー ジ 番号 を 指定 する 。 








時 文例 





| rw 0, 1 


圏 ノー ト 

この ステ ー ト メン ト は 、 ア クティ ブ ・ ペ ー ジ を ビジ ュ ア ル ・ ペ ー ジ に コピ ー 
し た りす る と き に 使う 。 

P 参照 ステ ー ト メン ト : SCREEN 
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POKE 
メモ リー へ の 書き 込み 


年 機能 
メモ リー 上 の 特定 の アド レス に 1 バイ ト 書 き 込 む 
目 書 式 


POKE アド レス , バイ ト 


軒 引 数 と オプ ショ ン 





生 文 例 





FOR addr = &H400 TO &H412 
POKE addr, PEEK(addr + &H100) 
NEXT addr | 





時 ノー ト 
p 参照 ステ ー ト メン ト : DEF SEG 
ド 参照 関数 : PEEK 
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PRESET 
ピク セル の カラ ー 設 定 


_ 機能 
スク リー ン 上 の ピク セル に カラ ー を 設定 し 、 描 く 
邊 書式 


PRESET [STEP] (x 座標 , y 座標 ) [, カラ ー] 


財 引 数 と オプ ショ ン 
ES ッ タ ア タ ン レン 


現在 の グラ フィ ッ ク ・ カ ー ソ ル の 位置 か ら 相 対 的 に xy 
の 座標 を 決め た いと き に 指定 する 。 


x 座標 , y 座標 設定 し た い ピ クセ ル の 座標 を 指定 する 。 
カラ ー の 属性 を 設定 する 。 





上 文例 





FOR x = 1 TO 600 | 
PSET (x, 200), 7 
PRESET STEP(-1, 0) 
NEXT x 
| PRESET (POINT(0) + 1, POTNT(1 ) ) 





回 ノー ト 

し カラー を 省略 する と 、 そ の と き の バ ッ ク グ ラン ド ・ カ ラー で 表示 され る 。 
参照 スチ テー トメ ント : PSET、COLOR 

ド 参照 関数 : POINT 
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PRINTu2 
スク リー ン 表 示 


"機能 
スク リー ン に デー タ を 表示 する 
邊 書式 


PRINT [USING 書式 制御 文字 列 :] 式 リ スト [{, | jj 


財 引 数 と オプ ショ ン 
EE:2 レ ルン 4 レス 機 能 
USING 書式 制御 文字 列 を 使う と き に 指定 する 。 


書式 制御 文字 列 | 式 の 値 の 表示 形式 や 位置 を 制御 し た いと き に 使う 。 

共 文 字 列 の 表示 
制御 文字 機能 

| @ | その 位置 か ら す べ て を 表示 する 。 

| 。 & | 2 つの & の 範囲 に 表示 する 。 

|  。 ! | 最初 に 1 文字 の み を 表示 する 。 

世 数 値 の 表示 


制御 文字 機能 

|  # | 右 詰め で 表示 する 。 

カン を 語 示 も る > 
ーー 先頭 に \ を 付け る 。 
|  。 * | 空白 部 分 を * で 埋め る 。 
|  。 . | 小数 点 を 表示 する 。 
符号 を 先頭 また は 末尾 に 表示 する 。 
| 一 |- を 先頭 に 表示 する 。 
|  。 ^  ] 指数 形式 で 表示 する 。 
|  。 | 書式 制御 文字 を 文字 と し て 表示 する 。 

式 リ スト 表示 し た い 値 を 指定 する 。 

式 は 、",。 "また は ": "で 区 切る 。 
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時 文例 ① 





| PRTNT "Quick" , "BASTC" 
| PRINT "Quick"i "BASTC" 
| PRINT 


PRINT "Quick": 
PRINT "BASTC" | 





目 文例 @ 





USING 
USING 
USING 
USING 
USTING 
USING 
USING 
USING 
USING 
USING 
USING 
USING 
USING 





園 ノー ト 


ぁ 引数 お よび オプ ショ ン を 省略 する と 、 改 行 す る 。 


"@BASIC": "Quick" 

"& &BASIC" : "Quick" 
"1BASTC" 』 "Quick" 

リ ########## 円 4200 
リオ #」###」### 円 ":) 4200 
リリ ザイ 」######「 : 4200 
"ます 」###": 4200 


"QucikBASTC(#.##)j 4.2 
リオ #。# 作 "ュー ー4.2 
リー リュ -4.2 
人 衝 記 本 の SI 4.2 
"ます #####」#": 420000000 
りり 才 栓 全 K MR まあ ( 奥 の fr 9 拓 





(表示 結果 ) 
Quick BASTC | 


QuickBASIC 


| QuickBAS1C 





(表示 結果 ) 





QuickBASIC 
QuiBAS1IC 
QBASTIC 
4200 円 
4,200 円 
\4.200 
ネネ 4 200 


QucikBASIC( 4.20 ) 
-4 .20 

4 .20- 

0.4E+01 
%420,000,000 
3.10 5.70 0.38 


ステ ー ト メン ト の 最後 に ", "また は " : "を 付け る と 改行 し な いで 次 の 表示 を 
行なう (USING で は ”" : "だ け 使 える )。 
USING を 使わ な い 式 リス ト 中 で の 式 は 、 等 間隔 な 表示 を 行なう に は ”, "で 区 
切り 、 ま た 続け て 表示 する に は ”: "で 区 切ら な けれ ば な ら な い 。 

ぁ USING を 使っ た 式 リ スト 中 で の 式 は 、" : "で 区 切ら な けれ ば な ら な い 。 

と "。 "は 、" お の 中 に 1 つ あ れ ば 3 桁 ご と に 区 切る こと が で きる 。 


yp オバ ー フ ロー する と 先頭 に "%” が 表示 され る 。 


1 つの 書式 制御 文字 列 で 、2 つ 以 上 の 式 を 同じ 書式 で 表示 で きる 。 


ぁ 書式 制御 文字 列 に は 、 文 字 列 変数 が 使え る 。 
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PRINT # ら 2 


シー ケン シャ ル ・ フ ァイル へ の 書き 出し 


目 機 能 
シー ケン シャ ル ・ フ ァイル に デー タ を 書き 出す 
邊 書式 


PRINT # フ ァイル 番号 , 
[USING 書式 制御 文字 列 :] 式 リス ト [{, | :)] 


由 引 数 と オプ ショ ン 





IE: 9 コレ ロン ルン レク 
# フ ァイル 番号 








OPEN ステ ー ト メン ト で オー プン し た と き の フ ァイル 
番号 を 指定 する 。 


書式 制御 文字 列 を 使う と き に 指定 する 。 


式 の 値 の 表示 形式 や 位置 を 制御 し た いと き に 使う 。 
共 文字 列 の 表示 













書式 制御 文字 列 
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数値 の 表示 

制御 文字 機 能 
右 詰め で 表示 する 。 
カン マ を 表示 する 。 
先頭 に \ を 付け る 。 
空白 部 分 を * で 埋め る 。 
小数 点 を 表示 する 。 
符号 を 先頭 また は 末尾 に 表示 する 。 
- を 先頭 に 表示 する 。 
指数 形式 で 表示 する 。 
|  。 -。 | 書式 制御 文字 を 文字 と し て 表示 する 。 


式 リ スト 表示 し た い 値 を 指定 する 。 
式 は 、"。 "また は " : "で 区 切る 。 


圏 ノー ト 
『 文例 と ノー ト に つい て は 、PRINT ステ ー ト メン ト の 箇所 を 参照 。 出 力 先 が ス 
クリ ー ン で は な く 、 デ ィ ス ク 上 の ファ イル に な る 。 
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PSET 
ピク セル の カラ ー 設 定 


_ 機能 
スク リー ン 上 の ピク セル に カラ ー を 設定 し 描く 
邊 書式 


軒 引 数 と オプ ショ ン 
EE レア ルン レク 
現在 の グラ フィ ッ ク ・ カ ー ソ ル の 位置 か ら 相対 的 に x、y 
の 座標 を 決め た いと き に 指定 する 。 





x 座標 ,」 y 座標 設定 し た い ビ ピク セル の 座標 を 指定 する 。 
カラ ー の 属性 を 設定 する 。 





軒 文 例 








FOR x =.1 TO 600 
PSE RE 2007)-( 
PRESET STEP(-1, 0) 
| NEXT X 
PRESET (POINT(0) + 1, POINT(1 ) ) 





ノ ー ト 
と カラ ー を 省略 する と 、 そ の と き の フ ォ ア グラ ンド ・ カ ラー で 表示 され る 。 
p 参照 テー トメ ント : PRESET、COLOR 
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PUT [ファ イル ] 


ラン ダム アク セス ・ フ ァイル / 人 バイ ナリ ー・ フ ァイル へ の 書き 出し 


_ 機能 
ラン ダム ・ ア クセ ス ・ フ ァイル また は バイ ナリ ー・ フ ァイル に デー タ を 書き 


出す 
是 書 式 


PUT [ 衣 ファ イル 番号 [, [レコ ー ド 番号 ] [, 変数 ]] 


還 引 数 と オプ ショ ン 






IE: ん < レア ルン レン 
ファ イル 番号 









OPEN ステー トメ ント ド ト で オー プン ジン し た と き の フ ァイル 
番号 を 指定 する 。 
ラン ダム アク セス ・ フ ァイル の と き は 、 次 に 書き 出す レ 
コー ド の 番号 (1 一 2147483647) を 指定 する 。 

バイ ナリ ー・ フ ァイル の と き は 、 次 に 書き 出す バイ ト の 
開始 位置 ( 1 ー フ ァイル ・ サ イズ ) を 指定 する 。 


書き 出す デー タ を 格納 する た め の 変 数 を 指定 する 。 









財 文 例 ① 





TYPE FoodRecType | 
itName AS STRING * 10 
amount AS INTEGER 
END TYPE 
DIM fruit AS FoodRecType 


OPEN "Fruit.Dat" FOR RANDOM AS 1 LEN = LEN( fruit ) 
recNum = 1 
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DO 


TNPU 和 T :) 「" Eruit (<cr> for EXTT) = "。 fmudt。 せ EName 
TE fruit.1itName = SPACE$( 10 ) THEN 
EXTIT DO 
END ITF 
TINPUT " , amount = " 。 fruit.amount 


PUT #1 , recNum, frui も 
recNum = recNum + 1 
LOOP 
CLOSE 1 
END 





目 文 例 @ 
























ジア ァイル の 操 王 
DTM oneByte AS STRTING ※* 1 
) enter fi1]le nameS .・.・ 
TNPUT "Source file name = ", sourceFile$ 
INPUT "Destination fi]e name = ", destFile$ 
) open files ... 
OPEN sourceFile$ FOR BTNARY AS 1 
OPEN destFile$ FOR BINARY AS 2 
bytePos = 1 
DO 

GET #1, bytePos , oneByte 

TF EOF( 1 ) THEN 

EXIT DO 

END IF 

PUT #2, bytePos, oneByte 

bytePos = bytePos + 1 
LOOP 
GMOS Ha 2 
END 


圏 ノー ト 

p "変数 "に レコ ー ド 型 変数 を 使う と き は 、 そ の 宣言 名 だ け で よい 。 

y FIELD ステ ー ト メン ト に よっ て バッ ファ を 割り 当て る と き は 、" 変 数 "の 部 
分 は 省く (FIELD ステ ー ト メン ト を 参照 )。 

バイ ナリ ー・ フ ァイル へ は 、 そ の 変数 の サイ ズ に 等 し い バ イト 数 だ け 書 き 出 
され る 。 

p 参照 ステ ー ト メン ト : OPEN、GET #、FIELD、CLOSE 


第 3 章 @⑳ ス テー トメ ント ーー]79 





PUT [グラ フィック タス ヌス ] 
スク リー ン ・ イ メー ジ の 描画 


_ 機能 
GET ステ ー ト メン ト で 読み 込ん だ スク リー ン ・ イ メー ジ を スク リー ン に 描く 
明 書 式 


PUT [STEP] (x, y), 配列 変数 名 [( 配 列 要 素 )] 
[, ピク セル 操作 ] 





時 引数 と オプ ショ ン 

JE ルコ レン ンス ルン 機 能 

STEP 現在 の グラ フィ ッ ク ・ カ ー ソ ル の 位置 か ら 相対 的 に x、y 
の 座標 を 決め た いと き に 指定 する 。 

xy その イメ ー ジ の 四角 形 の 左上 座標 を 指定 する 。 

配列 変数 名 GET ステ ー ト メン ト て で 保存 し た 配列 の 名 前 を 指定 する 。 

配列 要素 配列 上 の どの 要素 か ら 使う か を 指定 する 。 

ピク セル 操作 すでに グラ フィ ッ ク ・ ス クリ ー ン に 描か れ て いる 図 と の 
関係 を 指定 する 。 


操作 用 途 

PSET その まま 表示 する 。 
PRESET| 反転 し て 表示 する 。 
AND 操作 を 行なう 。 
OR 操作 を 行なう 。 
XOR XOR 操作 を 行なう 。 
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上 文例 

























才 EAD xii 。.y1 。 2。 y2 
DAPA 3 も 100、 100 
lbytes = 4 † す 4 * FNP(((x2 - xi + 1) + 7) / B) * (y2 -199 4 1) 
DIM imageSample(bytes / 2) AS INTEGER 
SCREEN 88, , 0, 1 
LINE (x1, y1)-(x2」。 y2)。 , BF 
GET (x1, y1)-(x2, y2), imageSample 
FOR n = 1 TO 10 

PUT (n * 10, n * 10), imageSample, XOR 

PCOPY 0, 1 
NEXT n 


弄 ノー ト 
"ピク セル 操作 "を 省略 する と 、XOR を 指定 し た の と 同じ に な る 。 
p 参照 スチ テート メン ト : GET、BSAVE、BLOAD 
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RANDOMIZE 
乱数 発生 の 初期 化 


上 機能 
乱数 の 発生 を 初期 化す る 
時 書式 


RANDOMIZE [ 式 ] 


財 オ プシ ョ ン 







乱数 発生 の も と に な る 系 列 (seed) を -32768 一 32767 の 範 
囲 内 で 指定 し ます 。 


和 文 例 ① 





| RANDOMIZE 5 
FOR i = 1 to 10 
PRINT TITNT(RND * 2) 
NEXT 





財 文 例 @ 





しい 委 素 者 ま 入 力 し て くだ きい (Cse7ee te sae の っ | 





圏 ノー ト 

放 " 式 "を 省略 する と その 入力 プロ ンプ ト が 表示 され ます (文例 ②) 。 

y RND 関数 を 使う プロ グラ ム で は 、 実 行 の 最初 で 初期 化し な いと 同じ 乱数 系 
列 に な る 。 

ぁ 参照 関数 : RND 
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READ 
DATA ステ ー ト メン ト の デー タ の 読み 込み 


目 機 能 

DATA ステ ー ト メン ト で 定義 され て いる デー タ を 読み 込ん で 変数 に 代入 す 
る 。 
目 書 式 


READ 変数 リス ト 


下 引 数 
変数 リス ト 









変数 リス ト 読み 込む た め の 変数 を 指定 する 。 





上 文例 





DIM dayName(6) AS STRING * 9 
FOR n = 0 TO 6 

READ dayName(n) 
NEXT n 


DATA Sunday, Monday, Tuesday, Wednesday 
DATA Thursday, Friday, SaturdaY 











圏 ノー ト 
ぁ 参照 ステ ー ト メン ト : DATA、RESTORE 
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REDIM 


配列 空間 の 変更 
邊 機能 
SDYNAMIC 宣言 し た 配列 の アロ ケー ショ ン 空 間 を 再度 割り 当て る 。 
同書 式 


REDIM [SHARED] 変数 (添字 ) [AS タイ プ ] 
[, 変数 (添字 ) [AS タイ プ ]] 


軒 引 数 と オプ ショ ン 





EL ッ 4 レ アン ムン 
SHARED 











モジ ュー ル ・ レ ベル の 変数 を その モジ ュー ル に 含ま れる 
すべ て の プロ シー ジャ と の 間 で 共有 化し た いと き に 指定 
する 。 
宣言 し た い 配 列 変数 名 と その 次 元 お よび 範囲 を 指定 する 。 
添 字 は 、 以 下 の よ うに し て 最大 60 次 元 ま で 指定 で きる 。 
(添字 [, 添字 ,.……]) 
1 つの 添字 の 男 囲 (-32768 一 32767) は 、 

[下限 To] 上 限 
の 形式 で 指定 する 。 
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変数 の タイ プ を 指定 する 。 こ の タイ プ 指 定 を 行なう と 変 
数 名 に は 、 型 宣言 文字 (%、&、! 、#、$) を 付け る 必要 は 
な い 。 


シル 0 アルコ 


STRING 


ユー ザー 定義 タイ プ | ユ 





















固定 長文 字 列 (n は 文字 長 ) 
STRING * n 


ー ザ ー 定 義 タ イプ 








邊 文例 





) $DTNAMTC 
REDIM temporaryArea(1 TO 1000) AS INTEGER 





較 ノ ー ト 
ル 添字 の 大 き さ は 変更 で きる が 、 そ の 次 元 に つい て は 変更 で き な い 。 


p 参照 ステ チー トメント 


SHARED、 COMMON、 STATIC、OPTION BASE 
p 参照 関数 : LBOUND、UBOUND 
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REM 


目 機 能 
注釈 を 書く 
目 書 式 


REM [注釈 ] 


時 オ プシ ョ ン 








時 文例 
REM メー ル 管 理 プ ログ ラム 
REM -----ーーーーーーーーーーーーーーー 
DECLARE SUB SendLetter (who$ ) ) プロ シー ジャ 
ー プ 間 才 ー: ジ ャ 


DECLARE SUB RecieveLetter (who$ ) 





圏 ノー ト 

y REM の 代わ り に 、' が 使え る 。 

yp は 、 ス テー トメ ント の 終わ り に 、": "で 区 切ら ず に 注釈 を 書く こと が で き 
る 。 
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RESET 
ファ イル の クロ ー ズ 


電機 能 
現在 オー プン し て いる すべ て の ディ スク ・ フ ァイル を クロ ー ズ する 
目 書式 


RESET 
邊 引数 と オプ ショ ン 


な し 
邊 文例 





RESET 


園 ノート 
P 参照 ステ ー ト メン ト : CLOSE 
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RESTORE 
読み 込む べき DATA ステ ー ト メン ト 行 の 指定 


_ 機能 

READ ス テー トメ ント で 読み 込む DATA ス テー トメ ン ト 行 を 指定 する 。 
この ステ ー ト メン ト を 使う と 、 同 じ READ ステ ー ト メン ト の デー タ を 何 回 で も 
読み 込む こと が で きる 。 
財 書 式 


RESTORE [{ 行 ラベ ル | 行 番 号 ] 


時 オプ ショ ン 


次 に 実行 する READ ステ ー ト メン ト て 読み 込む DATA 
ステ ー ト メン ト の 行 を 指定 する 。 





時 文例 
ー 





DIM 1astDay( 12 ) AS INTEGER 
RESTORE EndOfMonth 
FOR n = 1】 TO 12 
READ LastDay(n) 
| NEXT n 


| DayNameData: 
DATA Sunday, Monday, Tuesday, wednesday 
DATA Thursday, Friday, Saturday 
EndOfMonth: 
DATA 31。 28。 31,。 30。 31。 30。 31。 31。 30。 31,。 30。 31 | 








量 ノ ー ト 

オプ ショ ン を 指定 し な いと 、 最 初 の DATA ステ ー ト メン ト の デー タ か ら 読 
み 込 まれ る 。 

P 参照 ステ ー ト メン ト : READ、 DATA 
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RESUME 


プロ グラ ム の 続行 
"機能 
ェ ラ ー 処 理 し た あと 、 プ ログ ラム の 実行 を 続行 する 
自 書 式 


RESUME [0] | NEXT| 【 行 番号 | 行 ラ ベル }} 


目 引 数 と オプ ショ ン 






JE: レア ルン レス 
0 を 指定 する か 省略 する と エラ ー 発 生 ス テー トメ ント か 
ら 実行 を 開始 する 。 
これ を 指定 する と 、 エ ラー 発生 ステ ー ト メン ト の 次 ステ 
ー ト メン ト か ら 実 行 を 開始 する 。 
指定 し た 行か ら 開 始 す る 。 









時 文例 





RESUME NEXT 
ErrorHandleRoutine: 


RESUME NEXT 





較 ノ ー ト 

テ ” 行 番号 "と" 行 ラ ベル "は 、 モ ジュ ー ル ・ レ ベル で な けれ ば な ら な い 。 
P 参照 ステ ー ト メン ト : ERROR、ON ERROR 

p 参照 関数 ・ ERR、ERL 
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RETURN 
サブ ・ ル ー チ ン の 終了 
_ 機能 
サブ ・ ル ー チ ン か ら 戻 る 


邊 書式 


RETURN [{ 行 番号 | 行 ラ ベル }] 


時 オ プシ ョ ン 










戻り 先 の 行 番号 また は 行 ラ ベル を 指定 する 。 
行 番号 は 、 0 か ら 65529 の 範囲 で な けれ な ら な い 。 
行 ラ ベル に つい て の ルー ル 

・ 文 字 で 始め な けれ ば な ら な い 

・" リッ で 終わ ら な けれ ば な ら な い 

・40 文 字 以内 で な けれ ば な ら な い 

・ 大 文字 と 小文字 の 区 別 は な い 


行 ラ ベル 


上 文例 





GetNameRoutine: 
TNPUT "Your Name ?" , theName$ 
RETURN 





過 ノ ー ト 

行 番号 お よび 行 ラ ベル 省略 を する と 、 呼 び 出し た GOSUB の つぎ の ステ ー ト メン ト 
に 戻る 。 

戻る と き に 、 必 ず RETURN ステ ー ト メン ト を 使っ て 戻ら な けれ ば な ら ず 、 
GOTO ステ ー ト メン ト で 戻っ て は いけ な い 。 


190 


RMDIR 
ディ レク トリ の 削除 


目 機能 
ディ レク トリ を 削除 する 
上 書式 


RMDIR パス 名 





目 文 例 





thePath$ = "B:\MODULES\DOSCALL" 
1 thePath$ 


| "MATLTNG" 





量 ノ ー ト 
ディ レク トリ の 作成 は 、MKDIR ステ ー ト メン ト を 使う 。 
ディ レク トリ の 変更 は 、CHDIR ステ ー ト メン ト を 使う 。 
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RSET 
文字 列 変数 へ の 右 詰め 代入 


目 機 能 
文字 列 変数 に 右 詰め で 代入 する 
是 書 式 


RSET 文字 列 変数 = 文字 式 


則 引 数 











文字 列 変 数 





文字 列 変数 や ラン ダム アク セス ・ バ ッ フ ァ の 変数 を 指定 
する 。 


右 詰め に し た い 値 の 文字 式 を 指定 する 。 








正文 例 
OPEN "Fruit.Dat" FOR RANDOM AS 1 LEN = 12 
FIELD #1。 10 AS nameFld$,。 2 AS salesFld$ 
recNum = 1 
DO 
INPUT , " Fruit (<cr> for EXIT) = "。 itName$ 
IF itName$ = "" THEN 
EXIT DO 
END IF 


INPUT " , amount = ",。 amount% 
LSET nameF1d$ = itName$ 
RSET salesF1d$ = MKI$(amountX% ) 
PUT #1、 recNum 
recNum = recNum + 1 

LOOP 

| CLOSE 1 

END 








還 ノ ー ト 
FIELD バッ ファ に 数 値 を 書き 込む に は 、 MKI$、 MKL$、 MKS$、 MKD$ 関 
数 を 使っ て 文字 列 に し て か ら 行 な う 。 
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RUN 
プロ グラ ム の 実生 


目 機 能 
メモ リー 上 また は ディ スク 上 の プロ グラ ム を 実行 する 
邊 書式 


RUN [({ 行 番号 | プロ グラ ム 名 j] 


オプ ショ ン 










行 番号 を 指定 する と 、 メ モリ ー の 常駐 し て いる Quick 
BASIC の プロ グラ ム を その 行 番号 か ら 実 行 する 。 省 略す 
る と 先頭 か ら 実 行 する 。 
実行 し た い プ ログ ラム 名 を 指定 する 。 拡 張子 を 省略 し て 、 
Quick BASIC の 環境 内 で この ステ ー ト メン ト を 実行 す 
る と ".BAS" と みな し 、 ま た 実行 可能 形式 の プロ グラ ム の 
中 で は 、".EXE" と みな す 。 









プロ グラ ム 名 


下 文 例 





/ 
RUN "WordPlus" 





貞 ノ ー ト 

この ステ ー ト メン ト は 、 実 行 前 に オー プン 中 の デー タ ・ フ ァイル を 自動 的 に 
クロ ー ズ し 、 か つ メ モリ ー 上 の デー タ を クリ ア す る 。 

p 参照 ステ ー ト メン ト : CHAIN 
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SCREEN 
スク リー ン ・ モ ー ド の 設定 


_ 機能 
スク リー ン の モー ド を 設定 する 
虹 書 式 


SCREEN [モー ド 番 号 ]」[ パ レッ ト 番 号 ], 
(アデ ティ プ ・ ペ ー ジ 1 [ジュ アル ・ ペ ー ジ ] 


財 オ プシ ョ ン 
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パレ ッ ト て 使え る 色 数 を 番号 で 指定 する 。 


アク ティ プ ブ ・ ペ ー ジ | グラ フィ ッ ク 関 係 の ステ ー ト メン ト の 対象 に な る グラ フ 


ィ ッ ク ・ ス クリ ー ン の ペー ジ 番 号 を 指定 する 。 
ビジ ュ ア ル ・ ペ ー ジ | 実際 に 見 える グラ フィ ッ ク ・ ス クリ ー ン の ペー ジ 番 号 を 





上 文 例 


SCREEN 88。 , 1, 0 











圏 ノー ト 

モード を 指定 する と 、 ス クリ ー ン は クリ ア さ れる 。 

モー ド 87 で は 、 テ キス ト は グラ フィ ッ ク ・ ス クリ ー ン に 描か れる 。 
p 参照 ステ ー ト メン ト : COLOR、PALETTE 
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SEEK 


ファ イル 上 の 位置 の 設定 


機能 
オォ オー プン し て いる ファ イル に 対し て デー タ の 読み 書き (入出 力 ) を 行なう た 


め に 、 そ の ファ イル 上 の 特定 の 位置 に 設定 する 
邊 書式 


SEEK [# 紀 ファ イル 番号 , 位置 


員 引 数 と オプ ショ ン 






OPEN ステ ー ト メン ト で オー プン し た と き の フ ァイル 
番号 を 指定 する 。 
ファ イル 上 の 位置 を 指定 する 。 
ラン ダム アク セス ・ フ ァイル で は レコ ー ド 番号 で 、 そ の 
他 の ファ イル で は 先頭 か ら の バイ ト 数 で 指定 する 


ファ イル 番号 
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肖 文 例 


TYPE FoodRecType 


itName AS STRING * 10 
amount AS INTEGER 
END TYPE 

DIM fruit AS FoodRecType 





OPEN "Fruit.Dat" FOR RANDOM AS 1 LEN = LEN(fruit) 
recMax = LOF(1) / LEN(fruit) 
enterPrompt$ = "Rec. No (1 -" + STR$(recMax) + ") 『 
DO 
) enter RecNo ... 
PRTINT enterPrompt$: 
TINPUT recNum 
) branching ... - 
SELECT CASE recNum 
CASE 0 
EXIT DO 
CASE IS > recMax 
PRINT "Not valid record _ No. !" 
CASE ELSE 
SEEK #1, recNum 
GET #1。 。 fruit 














PRINT fruit.itNamei " = "ji USTNG "##」###") fru1t.amount 
END SELECT 
10OP 
は / 
圏 ノー トド ト 


ぁ 参照 ステ ー ト メン ト : OPEN、GET# 
『 参照 関数 : SEEK 
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SELECT CASE 
多重 分 岐 


_ 機能 
多重 分 岐 の ブロ ッ ク の うち の 1 つ を 実行 する 
邊 書式 


SELECT CASE テス ト 式 
CASE 式 リ スト 1 
[ステ ー ト メン ト ・ ブ ロッ ク 1] 
[CASE 式 リ スト 2 
[ステ ー ト メン ト ・ ブ ロッ ク 2]] 


[CASE ELSE 
[ステ ー ト メン ト ・ ブ ロッ ク n]] 
END SELECT 


財 引 数 と オプション 






IE: レシ ルン レク 
テス ト し た い 値 を も つ 式 を 書く 。 
テス ト 式 が 取り うる 値 、 範 囲 、 ま た は 関係 式 を 書く 。 
指定 の 仕方 例 
等 し い 値 CASE 1 3 5。 7, 8 1 入 


特定 の 範囲 値 | CASE 1 TO 5, "FMT" TO "HIT" 
(TO を 使う ) 





式 リ スト 1 一 m 
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CASE 


CASE IS く > 5 
CASE IS く 5 
CASE IS く = 5 
CASE IS > 5 
CASE IS >= 5 


(IS を 使う ) 
1 つの 式 リ スト に これ ら を 混在 で きる 。 
式 リ スト 1 一 m が 真 の と き に 実行 させ た い ス テー トメ 
ント を 書く 〈。 
式 リ スト 1 一 m の すべ て が 偽 の と き に 実行 させ た い ス 
テー トメ ント を 書く 〈。 















ステ ー ト メン ト ・ 
ブロッ ク 1 一 m 









汗 文 例 






SUB binarySearch (iaStat, theArray( ), keyData) 
1ow = LBOUND(theArray ) 
high = UBOUND(theArray ) 
DO WHILE (1ow <= high) 
mid = INT((1ow + high) / 2) 
SELECT CASE keyData 
CASE theArray(mid) ) Found ! 
isStat = mid | 






*EXIT DO 

CASE TS < theArray(mid) ' search backward 
high = mid - 1 

CASE IS > theArray(mid) '′ search forward | 
1ow = mid + 1 | 

CASE ELSE Not found ! | 
isStat = -1 


EXIT DO 

END SELECT 
LOOP 

END SUB ノ 








較 ノ ー ト 

"CASE 式 2" 以 下 の 部 分 は 省略 で きる 。 

END SELECT" の 部 分 は 省略 で き な い 。 

p 式 リ スト に 書い た も の の うち 、 ど れ か が 真 で あれ ば その ステ ー ト メン ト ・ ブ 
ロッ ク を 実行 する 。 

P 参照 スチ テー トメ ント :IF 
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SHARED 
変数 の 共有 化 


_ 機能 

SUB また は FUNCTION プロ シー ジャ 内 に お いて 、 モ ジュ ー ル ・ レ ベル の 変 
数 を 共有 の も の と し て 宣言 する 。 

これ に より 、 モ ジュ ー ル ・ レ ベル と その プロ シー ジャ と の 間 で の み 共 有 化 が 
可能 と な る 。 他 の プロ シー ジャ が その 変数 を 共有 する か どう か は 関与 し な い 。 
目 書 式 


SHARED 変数 [AS タイ プ ] [, 変数 [AS タイ プ ]] 


時 引数 と オプ ショ ン 







IE レア ンタ 








レア ルコ 


INTEGER 
SINGLE 


DOUBLE 


STRING 















固定 長文 字 列 (n は 文字 長 ) 
STRING * n 


ユー ザー 定義 タイ プ | ユー ザー 定義 タイ プ 


g00 


時 文例 ① 


SystemO1dIndex = 0 


CALL PointRecOne (theKey$ ) 





SUB PointRecOne (itKey$ ) 
SHARED SystemO1dIndex 


SystemO1dIndex = recNo 


END SUB 





賠 ノ ー ト 
p 参照 ステ ー ト メン ト : COMMON、STATIC、DIM 
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SHELL 
DDS コマ ンド の 実生 


所 機能 
DOS コマ ンド を 実行 する 
生 書 式 


SHELL [コマ ンド 文字 列 ] 


征 引 数 と オプ ショ ン 










コマ ンド 文字 列 | 実行 し た い コ マン ド お よび パラ メー ター を 文字 列 に し て 


| SHELL "format b:/v" 





層 ノ ー ト 
し オプ ショ ン を 省略 する と 、 "COMMAND.COM" を 呼び 出す 。Quick BASIC 
に 戻る に は 、DOS プロ ンプ ト に お いて 、EXIT コマ ンド を 実行 する 。 


実行 する コマ ンド は 、DOS 内 部 コマ ンド 、.COM、.EXE、. BAT の 順に 探す 。 
参照 ステ ー ト メン ト 


CHDIR、MKDIR、RMDIR、NAME、ENVIRON 
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STATIC 
ロー カル 変数 の 宣言 


_ 機能 

SUB お よび FUNCTION プロ シー ジャ 、 な ら び に DEF FN 関数 内 で 、 モ 
ジュ ー ル ・ レ ベル の グロ ー バ ル 変 数 と 同名 の ロー カル 変数 を 宣言 する 。 こ れ に 
より 、 不 用 意 な デー タ 変 更 を 避け る こと が 可能 に な る 
邊 書式 


STATIC 変数 [()] [AS タイ プ ] [, 変数 [()] [AS タイ プ ]]... 


上 引 数 
引数 と オプ ショ ン 機 能 








変数 ロー カル 変数 と し て 宣言 し た い 変 数 を 指定 する 。 

タイ プ 変数 の タイ プ を 指定 する 。 こ の タイ プ 指 定 を 行なう と 変 
数 名 に は 、 型 宣言 文字 (%、&、! 、#、 $) を 付け る 必要 は 
な い 。 


タイ プ 名 機能 








STRING 固定 長文 字 列 (n は 文字 長 ) 
STRING * n 


ユー ザー 定義 タイ プ | ユー ザー 定義 タイ プ 
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目 文 例 ① 


SHARED theName AS STRTNG * 20, SystemParam AS rmope 
theName = "QuickBASTIC" | 


/ 








上 文例 








SUB GetUserName (hisName AS STRING * 20) 
STATIC theName AS STRING * 20 
theName = hisName 


END SUB 





田 ノ ー ト 
参照 ステ ー ト メン ト : DIM、 COMMOM、SHARED 
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STOP 
ブロ グラ ム の 終了 


折 機 能 

Quick BASIC の 統合 環境 下 で 実行 し て いる と き は 、 そ の プロ グラ ム を 終了 す 
る 。 ま た 、 実 行 可能 ファ イル 形式 (.EXE) の プロ グラ ム を 実行 し て いる と き は 、 
その プロ グラ ム を 終了 し DOS へ 制御 を 戻す 
肖 書 式 


STOP 
叶 引 数 と オプ ショ ン 


な し 
正文 例 





STOP 





固 ノ ー ト 
p 参照 ステ ー ト メン ト : END、SYSTEM 
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SUB 


SUB プロ シー ジャ の 定義 


中 機能 

SUB プロ シー ジャ を 定義 むす る 。 1 つの SUB プロ シー ジャ は 、SUB ステ ー ト メ 
ント と 対応 する END SUB ステ ー ト メン ト ま で で ある 
骨 書 式 


SUB プロ シー ジャ 名 [( 引 数 リス ト )] [STATIC] 


END SUB 


叶 引 数 と オプ ショ ン 













レア ルン ルク 
SUB プロ シー ジャ 名 を 40 文 字 以 内 で 指定 する 。 
SUB プロ シー ジャ が コー ル 側 か ら の パラ メー ター を 受 
け 取 る た め の 引 数 リス ト で ある 。 
この 引数 は 、 
変数 [()] [AS タイ プ ] 
1 1 1 
SUB 内 で 使 配列 用 つぎ の どれ か で 指定 する 
う 変数 名 ・INTEGER( 整 数 ) 
・LONG  ( 長 整数 ) 
・SINGLE ( 単 精度 ) 
・DOUBLE( 倍 精度 ) 
・STRING (可変 長文 字 列 ) 
・ ユ ー ザ ー 定 義 タ イプ 
か ら な り 、 複 数 ある と き は カン マ で 区 切る 。 


これ を 指定 する と 、 そ の ロー カル 変数 は 保 た れる 。 





引数 リス ト 





STATIC 
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征 文 例 (配列 デー タ を 使っ た バイ ナリ ー・ サ ー チ ) 





SUB binarySearch (isStat, theArray( ) , keyData ) 
1ow = LBOUND( theArray ) 
high = UBOUND(theArray ) 
WHILE (1ow <= high ) 
mid = INT((]ow + high) / 2) 
TF (keyData < theArray( mid ) ) THEN 
high = mid - 1 
ELSETF (keyData > theArray( mid ) ) THEN 
1ow = mid + 1 
ELSE 
isStat = mid 
EXIT SUB 
END IF 
WEND 
isStat = -1 
END SUB 








玉 ノ ー ト 

コー ル 側 の 引数 の 数 お よび タイ プ と 同じ で な けれ ば な ら な い 。 

引数 リス ト に お ける 変数 の 名 前 は 、 コ ー ル 側 の 変数 名 と 同じ で ある 必要 は な 
い 。 

引数 は 、 参照 渡し (call by reference) され る の で 、 プ ロ シ ー ジ ャ 内 で の 書換 
え が 可 能 で ある 。 

引数 リス ト に お ける 変数 は 、SUB 内 に お いて ロー カル で ある の で コー ル 側 に 
戻る と き 自 動 的 に 消滅 する 。 

引数 リス ト の 中 で 配列 変数 を 使う と き は 、 そ の 変数 名 に 続け て () の み を 付け 
る 。 

w END SUB 以前 で コー ル 側 に 戻る に は 、EXIT SUB ステ ー ト メン ト を 使 
秒 e 

p 呼び 出す に は 、CALL ステ ー ト メン ト を 使う 。 





第 3 章 @ ス テー トメ ント ーー 一 P07 


SWAP 
変数 の 値 の 入れ 替え 


"機能 
2 つの 変数 の 値 を 相互 に 入れ 替え る 
邊 書式 


SWAP 変数 1, 変数 2 


貼 引 数 







入れ 替え た い 2 つ の 変数 を 指定 する 。 
これ ら の 変数 は 、 同 じ タ イプ で な けれ ば な ら な い 。 

















箇 文 例 ① 
| SWAP firstName$ , secondName$ 
も ーーー- ーーー ーーー ーー ーー ー mdin 
正文 例 
firstName AS STRING * 10 


secondName AS STRING * 10 
FND TYPE 


TYPF aPersonalRecordTyje ) ユー ザー 定義 型 
| DIM player' AS aPersona1RecordType, pianist AS aPersonalRecordType 
| 


LET player.firstName = "Bi11" 

LET player.secondName = "Evans" 
LET pianist.firstName = "David" 

LET pianist.secondName = "Matthews" 





SWAP player , pianist 





還 ノ ー ト 
ユー ザー 定義 型 の 変数 の 入れ 替え は 、 両 方 の タイ プ が 同じ な ら ば 、 そ れ ら を 
構成 し て いる 要素 を 個別 に 入れ 替え な く て も 変数 名 だ け で 行なえ る (文例 ②) 。 








g0B 


SYSTEM 
プロ グラ ム の 終了 


邊 機能 

Quick BASIC の 統合 環境 下 で 実行 し て いる と き は 、 そ の プロ グラ ム を 終了 す 
る 。 ま た 、 実行 可能 ファ イル 形式 (.EXE) の プロ グラ ム を 実行 し て いる と き は 、 
その プロ グラ ム を 終了 し DOS へ 制御 を 戻す 

征 書 式 
SYSTEM 








上 還 引数 と オプ ショ ン 
な し 
上 文 例 








SYSTEM 


時 ノー ト 

mp オー プン 中 の ファ イル は 、 終 了 す る 前 に すべ て クロ ー ズ され る 。 

ym ダイ レク ト ・ モ ー ド ・ ウ ィ ン ド ウ に お ける この ステ ー ト メン ト の 実行 は 、 
?F/ フ ァイル "メニ ュー に お ける "X/ 終 了 "” コ マン ド の 実行 と 同じ で ある 。 
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TIMES 


時 刻 の 設定 
_ 補 能 
MS-DOS の 時 刻 を 設定 する 
店 書式 
TIME$ = 時 刻 
叶 引 数 






設定 し た い 時 刻 を 文字 式 で 指定 する 。 
時 刻 は 、 "HH : MM : SS" 










時 (00 一 23) 

分 (00 一 59) 

秒 (00 一 59) 
の 形式 で 指定 する 。 
な お 、" : MM : SS" ま た は " : SS”" の 部 分 は 省略 可能 で あ 
り 、 そ の 部 分 に は 0 分 0 秒 ま た は 0 秒 が 設定 され る 。 








征 文 例 

| TTME$ = "15" ) 15:00:00 と 同じ ] 
| TIME$ = "15:07" ) 15:07:00 と 同じ | 
| TIME$ = "15:07:30" | 
還 ノ ー ト 


し MS-DOS の TIME コマ ンド と 同じ 機能 を も っ て いる 。 
MS-DOS 上 の 現在 の 時 刻 を 知る に は 、TIMES 関 数 を 使う 。 
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TIMER 


タイ マー・ イ ベン ト ・ ト ラッ ピン グ の 設定 


電機 能 
タイ マー・ イ ベン ト ・ ト ラッ ピン グ を 有効 また は 無効 に する 
目 書 式 


TIMER (ON| OFF | STOP} 


目 引 数 






タイ マー・ イ ベン ト ・ ト ラッ ピン グ を 有効 に する 。 
有効 で ある あい だ 、ON TIMER(n) GOSUB ステ ー ト メ 
ント で 設定 し た 秒 数 が 経過 し た か どう か チェ ッ ク し 、 経 
過 し た と き は 、 そ の イベ ント ・ ト ラッ ピン グ の サブ ルー 
チン を 実行 する 。 
タイ マー・ イ ベン ト ・ ト ラッ ピン グ を 無効 に する 。 
OFF は 、 そ の イベ ント を 記憶 し な い が 、STOP は 、 記憶 
し で いる の で トラ ッ ピ ング で きる よう に な る と @N 
TIMER ルー チン を 実行 する 。 










STOP 


正文 例 





TIMER ON 
ON TINER( 5 ) GOSUB skipToNext 
DO 


LOOP 


skipToNext: | 
TIMER OFF | 
) 





圏 ノー ト 
P 参照 ステ ー ト メン ト : ON event GOSUB 
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TRON/TROFF 
トレ ー ス の 開始 と 終了 


_ 機能 

プロ グラ ム 実 行 の トレ ー ス を 開始 する 。 ま た は プロ グラ ム 実 行 の トレ ー ス を 
終え る 
目 書 式 


① TRON 


② TROFF 


財 引 数 と オプ ショ ン 
な し 
上 文例 


Tao | 
ー 


圏 ノー ト 
トレ ー ス 中 は 、 実 行 し て いる ステ ー ト メン ト が 反転 表示 され る 。 

















gl 


TYPE 


ユー ザー 定義 型 変数 の 型 の 定義 


目 機 能 


ュー ザー 定義 型 変数 (レコ ー ド 変数 ) の 型 を 定義 する 。 こ れ に より 、 複 雑 に 構造 
化し た デー タ 構 造 を 定義 で きる 
時 書式 


TYPE ユー ザー 定義 タイ プ 名 
要素 名 1 AS タイ プ 
要素 名 2 AS タイ プ 


END TYPE 





目 引 数 
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DOUBLE 


STRING 









固定 長文 字 列 (n は 文字 長 ) 
STRING * n 


ユー ザー 定義 タイ プ | ユー ザー 定義 タイ プ 





肖 文 例 





TYPE RecPointerType >) ポイ ンタ ー・ タ イプ 
ptr AS INTEGER 

END TYPE 

TYPE Logica1Type ) ロジ カル ・ タ イプ 
YesNo AS INTEGER 

END TYPE 

TYPE DateType ) 日 付 タ イプ 
Year AS INTEGER 
month AS INTEGER 
day AS INTEGER 

END TYPE 

TYPE Mai1Type ) メー ル ・ タ イプ 
who AS STRING * 20 
where AS STRING * 40 
when AS DateType 
what AS STRING * 30 
reply AS Logica1Type 
nextNode AS RecPointerType 

ENDTYPE 

CONST DONE = -1, UNDO = NOT DONE 

DIM sendMai] as Mai1Type , recieveMai] as Mai1Type 


LET sendMai1.who = "Chizuko OOHATA" 
LET sendMai]1.when.Year = 1989 
LET sendMai1.reply.YesNo = DONE 








圏 ノー ト 
ぴ 参照 ステ ー ト メン ト 
DIM、REDIM、 COMMON、STATIC、SHARED、LET 
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UNLOCK 


ファ イル ・ ア クセ ス の アン ロッ ク 


目 機能 

ネッ トワ ー ク の も と で オー プン され て いる ファ イル に 対す る アク セス を アン 
ロッ ク す る 
明 書 式 


UNLOCK [ 衣 ファ イル 番号 
[, {レコ ー ド | [開始 位置 ] TO 終了 位置 )] 


員 引 数 と オプ ショ ン 





トル コレ アン レス 
ファ イル 番号 






アン ロッ ク し た い フ ァイル の 番号 を 指定 する 。 
アン ロッ ク し た い レ コー ド ま た は バイ ト 位 置 を 指定 する 。 
アン ロッ ク し た い 範 囲 を レコ ー ド また は バイ ト 位 置 で 指 
定 する 。 







邊 文例 


| ONLOCK #1, 1 TO 100 | 
| UNLOCK #2 
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画 ノ ー ト 

pp ラン ダム アク セス ・ フ ァイル で は 、 レ コー ド 番 号 で 行なう 。 

バイ ナリ ー・ フ ァイル で は 、 バ イト 位置 で 行なう 。 

pp シー ケン シャ ル ・ フ ァイル で は 、 フ ァイル 全体 が アン ロッ ク さ れる 。 
ファ イル 番号 だ け を 指定 する と 、 フ ァイル 全体 を アン ロッ ク す る 。 

"TO 終了 位置 "だ け を 指定 する と 、 フ ァイル の 先頭 か ら そ こま で を アン ロッ 
ク す る 。 

アン ロッ ク す る と き の 範囲 指 定 は 、 ロ ッ ク 時 と 同じ で な けれ ば な ら な い 

p 参照 ステ チー トメント : LOCK 
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VIEW 
グラ フィ ッ ク の 物理 ビュ ー・ ポ ー ト の 定義 


目 機 能 

指定 し た 物理 領域 (四角 型 ) を グラ フィ ッ ク ・ ビ ュー・ ポ ー ト と し て 定義 す 
る 。 

正 書 式 


VIEW [[SCREEN] (x1, y1) - (x2, y2) 


由 引 数 と オプ ショ ン 

EE: コレ ンス ルス 機能 
この オプ ショ ン を 使う と 、 物 理 座標 の 指定 は 絶対 座標 で 
行なう こと に な る 。 
定義 し た い 物 理 座標 を 指定 する 。 















SCREEN 












x2, y2 
x1 
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定義 し た 領域 を 特定 の カラ ー で 塗り つぶ し た いと き に そ 
の コー ド を 指定 する 。 

定義 し た 領域 を 特定 の カラ ー で 囲む 境界 線 に カラ ー を 設 
定 し た いと き に 、 そ の カラ ー・ コ ー ド を 指定 する 。 





上 文例 








VITEW SCREEN (90, 90)-(310, 310), 1, 3 
FOR aspect = 1 TO 5 STEP .2 

CIRCLE (200, 200), 100, 3, , , aspect 
| NEXT 








田 ノ ー ト 
"カラ ー" を 省略 する と 塗り つぶ し は 行なわ れ な い 。 
"境界 線 "を 省略 する と 境界 線 は 引か れ な い 。 
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VIEW PRINT 
テキ スト 表示 の 行 範囲 設定 


_ 機能 

スク リー ン に お ける テキ スト 表示 お よび クリ ア の 行 範囲 を 設定 する 。 ス クロ 
ー ル は 、 こ の 範囲 で 行なわ れる 
肌 書 式 


VIEW PRINT [上 行 番号 TO 下行 番号 ] 


財 オ プシ ョ ン 







設定 し た い テ キス ト 表 示 の 上 限 と 下限 の 行 を 指定 する 。 


汗 文 例 


VIEw PRINT 15 TO 23 
| 


圏 ノー ト 

em オプ ショ ン を 省略 する と デフ ォ ル ト 値 (上 行 番号 = 1 、 下 行 番号 =25) に 設定 さ 
れる 。 

スク ロー ル は 、 そ の 範囲 で 行なわ れる 。 

Py この ステ ー ト メン ト を 実行 し た あと で の テキ スト の 行 座標 指定 は 、 相 対 的 に 
で は な く 、 ス クリ ー ン の 最上 行か ら 数 えた 行 番号 で 指定 し な けれ ば な ら な い 。 
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WAIT 


プロ グラ ム の 実行 の 停止 
目 機 能 
入力 ポー ト を 監視 中 、 プ ログ ラム の 実行 を 停止 させ て お く 
届 書 式 


WAIT ポー ト 番 号 , AND 式 [, XOR 式 ] 


周 引数 と オプ ショ ン 

HE ネル ン ルン 
停止 し た い ポ ー ト の 番号 (0 一 255) を 指定 する 。 
AND 演算 の た め の ビ ッ ト パ ター ン を 指定 する 。 


AND 演算 の 前 に XOR 演算 を 行なう た め の ビ ッ ト パ タ 
ー ン 指定 す る 。 








| WAIT 10, 20 


時 ノー ト 
『 演算 結果 が 0 で も や る あい だ 、 そ の ポー ト か ら の 読み 込み を 続け 、 0 以外 な ら 
ば 、 次 の り の ステー トメント を 実行 する 。 


ee0 


WEND 


WHILE ステ ー ト メン ト へ の 戻り 


対応 する WHILE ステ ー ト メン ト に 実行 の 流れ を 戻す 


目 書 式 


WHILE 論理 式 


WEND 


箇 引 数 と オプ ショ ン 


な し 


正文 例 (配列 デー タ を 使っ た バイ ナリ ー・ サ ー チ ) 





ン 





END SUB 





SUB binarySearch (isStat, theArray( ) , keyData ) 
1ow = LBOUND(theArray ) 
high = UBOUND( theArray ) 
WHILE (1ow <= high ) 
mid = INT((1ow + high) / 2) 
TF (keyData < theArray(mid ) ) THEN 
high = mid - 1 
ELSEIF (keyData > theArray(mid ) ) THEN 
1ow = mid + 1 
ELSE 
isStat = mid 
EXTT SUB 
END 1F 
WEND 
isStat = -1 
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繰り 返し 実行 
_ 機能 
条件 式 が 真 (0 以外 ) で ある あい だ 、 対 応 す る WEND ステ ー ト メン ト と で 囲ん 


だ ブロ ッ ク 内 の ステ ー ト メン ト を 実行 する 
目 書 式 


WHILE 論理 式 
WEND 


邊 引数 


繰り 返し 実行 させ た いと き に テス ト す る 式 で ある 。 





時 文例 (配列 デー タ を 使っ た バイ ナリ ー・ サ ー チ ) 





| sm binarySearch (isStat, theArray( ) , keyData ) 
1ow = LBOUND(theArray ) 
high = UBOUND(theArray ) 
WHILE (1ow <= high) 
mid = INT((1ow + high) / 2) 
IF (keyData < theArray(mid) ) THEN 
high = mid - 1 
ELSEIF (keyData > theArray(mid) ) THEN 
1ow = mid + 1 
ELSE “ 
18Stat = mid 
EXIT SUB 
END IF 
wEND 
isStat = -1 
FND SUB 











画 ノ ー ト 
『 論理 式 を 省略 する こと は で き な い 。 


ee 


WIDTH 
出力 文字 数 の 設定 (Ver.4.5 拡張 ) 


電機 能 
スク リー ン に お ける テキ スト 表示 の 桁 数 と 行 数 を 設定 する 。 
デバ イス へ 出力 する と き の 1 行 の 文字 数 を 設定 する 。 
プリ ンタ ー の 印刷 文字 数 を 設定 する 。 

邊 書式 


①WIDTH [ 桁 数 ] [, 行 数 ] 
② WIDTH 合 フ ァイル 番号 | デバ イス }, 出力 文字 数 


③ WIDTH LPRINT 印刷 文字 数 





時 オプ ショ ン ( 書 式 ①) 





財 オ プシ ョ ン ( 書 式 @) 










# フ ァイル 番号 出力 し た い デ バイ ス に 割り 当て た ファ イル 番号 を 指定 す 
また は る 。 
デバ イス 名 デバ イス 名 ("LPT1 : ") を 指定 する 。 






出力 する と き の 1 行 の 文字 数 を 設定 する 。 
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時 引数 (書式 ③) 


印刷 文字 数 








時 文例 ① 


/ 





WIDTH 80, 25 | 








OPEN "LPT1:" FOR OUTPUT AS 1 
WIDTH #1, 80 
| PRINT #1 





正文 例 ③ 





ym LPRTNT 80 





賠 ノ ー ト 
P 行 数 ・ 桁 数 と も に 変更 で きま せん 。 従来 の BASIC と の 互換 性 を 保つ た め に こ 
の ステ ー ト メン ト は ある 。 


ee4 


WINDOW 


カレ ント ・ ピ ュー ポー ト の 論理 座標 の 定義 





画 機能 
カレ ント ・ ビ ュー ポー ト の 論理 座標 を 独自 に 定義 する 


一 書 式 





WINDOW 【[[SCREEN] (x1, y1) - (x2, y2)] 





圏 オ プシ ョ ン 


AOQNI ハ 






指定 する と スク リー ン の 上 か ら 下 へ Y 座標 が 大 きく な る 。 
スク リー ン の 論理 座標 を 指定 する 。 


SCREEN 







弄 文 例 


READ x1。 y1。 x2。 y2 

DATA 1, 1, 100, 100 

WINDOW (-640, -400 )-(640, 400) 

bytes = 4 + 4 * INT(((x2 - x1 + 1) + 7) / 8) * (y2 - y1 + 1) 
DIM imageSample(bytes / 2 / 2) AS INTEGER 

SCREEN 88, , 0, 1 

LINE (x1, y1)-(x2, y2)。 , BF 


GET (x1, y1)-(x2, y2), imageSample 
FOR n = 1 TO 10 
PUT (n キ 10。 n * 10), imageSample, XOR 
PCOPY 0, 1 
NEXT n 





田 ノ ー ト 

オプ ショ ン を すべ て 省略 する と 、 デ フォ ルト に 設定 され る 。 
ぁ 参照 ステ ー ト メン ト : SCREEN、VIEW 

p 参照 関数 : PMAP、POINT 
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EE に | 


WRITE 


スク リー ン 表 示 





玉 機 能 

スク リー ン に デー タ を 表示 する 。 シ ー ケ ン シ ャ ル ・ フ ァイル へ の 書き 出し イ 
メー ジ で 表示 する 。 
画 書 式 





WRITE [ 式 リス ト ] 





圏 オプ ショ ン 


表示 し た い 式 の リス ト を 指定 する 。 





一文 例 く 表示 結果 > 


aName$ = "Quick" DA 由 
WRITE aName$, "BASTC" 。 4.2 Quick' BASIC ,4.2 





田 ノ ー ト 
式 は 、",。 "で 区 切る 。 こ の 区 切り 記号 も 表示 され る 。 
p 式 の な か の 文字 列 デ ー タ は 、"” "で 囲ま れる 。 


ge6 


WRITE# 


シー ケン シャ ル ・ フ ァイル へ の 書き 出し 





軒 機 能 
シー ケン シャ ル ・ フ ァイル へ ヘ へ データ を 書き 出す 
較 書 式 





WRITE # フ ァイル 番号 , 式 リ スト 





# ヨ TBAA 


一 引数 


# フ ァイル 番号 OPEN ステ ー ト メン ト で オー プン し た と き の フ ァイル 


番号 を 指定 する 。 
書き 出し た い 式 の リス ト を 指定 する 。 





一 文例 ① 


OPEN "Foods.Dat" FOR OUTPUT AS 1 
DO 


TNPUT j "Product = "。 aName$ 
TF aName$ = "" THEN 
EXTT DO 


END 1F 
INPUT " , Sales = ",。 sales 
WRITE #1, aName$, sales 
LOOP 
CLOSE 1 
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画 文 例 ら 


TYPE FoodRecType 
itName AS STRING * 10 
amount AS INTEGER 
END TYPE 

DIM fruit AS FoodRecType 


OPEN "Fruit.Dat" FOR OUTPUT AS 1 
DO 
INPUT : " Fruit (<cr> for EXIT) = "。 fruit. itName 
IF fruit.itName = SPACE$(10) THEN 
EXIT DO 
END IF 
INPUT " , amount = ", fruit.amount 
WRITE #1, fruit. itName, fruit.amount 
LOOP 
CLOSE 1 





田 ノ ー ト 

書き 込む ファ イル は 、OUTPUT モー ド ま た は APPEND モー ド で オー プン 
し な けれ ば な ら な い 。 

書き 込ん だ ファ イル は 、 必 ず ク ロー ズ し な けれ ば な ら な い 。 

書き 込む デー タ の 行末 に は 、 改 行 コ ー ド (&H0D, &H0A) が 付け られ る 。 
フィ ー ル ド は 、", "で 区 切ら れる 。 

ぁ 式 の な か の 文字 列 デ ー タ は 、"”" で 囲ま れる 。 

ぁ 参照 ステ チー トメント : OPEN、INPUT #、CLOSE 


geB 


EL 
3EC4 


この 章 で は 、QuickBASIC が 標準 と し て 提供 し て いる 
関数 の すべ て を アル ファ ベッ ト 順 に 説明 し ます 

関数 に つい て 機能 別に 知り た いと さき は 、 

付録 の 「 機 能 別 ス テー トメ ント ・ 関 数 索引 」 を 利用 し て くだ さい 
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この 章 の 読み 方 





この 章 で は 、Quick BASIC(Ver.4 .2) に お ける 全 関 数 を アル ファ ベッ 
ト 順 に 要約 し ます 。 各 関数 は 、 以 下 の ス タイ ル で 記述 し ます 。 


関数 名 () 

機能 に つい て の 要約 が 記述 され て いま す 。 

引数 を 必要 と する 関数 に は () が つい て いま す 。 
画 機 能 

その 関数 の 働き や 用 途 に つい て の 要約 が 記述 され て いま す 。 
男 書 式 

その 関数 に つい ぃ て の 完全 な 構文 (セン タッ クス ) が 記述 され て いま す 。 
文字 や 記号 は 、 以 下 の よ うな 用 途 で 使い ます 。 


@ 書 式 中 の 記号 の 記述 と 意味 










文字 ・ 記 号 
大 英文 字 お よび 
生か 


その まま 書く べき 箇所 









ファ イル 番号 
コー ド 1 


適当 な も の に 置き 換え 
て 書く べき 箇所 


省 略 可能 な 箇所 
どれ か 1 つ を 選ぶ べき 箇所 
反復 的 に 使え る 箇所 


(の) 
隔 
の 
読 
し 4 
方 













{数 値 式 | 文字 式 } 
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較 引 数 と 戻り 値 
引数 お よび 戻り 値 が まとめ て あり ます 。 


@⑱ 引 数 お よび 戻り 値 中 の 記号 の 記述 と 意味 


引 数 関数 に 渡す 引数 の タイ プ や 注意 点 に つい て 記述 し て あり ます 。 


戻り 値 | 関数 が 返す 値 の タイ プ や 注意 点 に つい て 記述 し て あり ます 。 





圏 文例 

サン プル と し て その 使用 例 を 掲げ て あり ます 。 
田 ノ ー ト 

パラ メー ター や オプ ショ ン に つい て の 補足 的 な 説明 や 使用 する と き 
の 注意 点 に つい て 記述 され て いま す 。 


の 
章 
の 
み 
】 





第 4 章 @ 関 数 一 一 31 


ABS0( 
絶対 値 





画 機 能 
絶対 値 を 求め る 
画 書 式 





ABS( 数 値 式 ) 





較 引 数 と 戻り 値 
引 数 数 値 式 … 絶 対 値 に し た い 数 値 を 渡す 





戻り 値 | 符号 の な い 数 値 が 返さ れる 。 


田 文 例 


numericExpreSSion = -4.2 


absoluteValue = ABS(numericExpresSsion ) 
PRINT absoluteValue, numericExpresSsion 





< 実行 結果 > 


圏 ノー ト 
ぁ 参照 関数 : SGN() 





g3g 


ASC0 


ASOII コー ド / 漢 字 連 続 コ ー ド 











画 機 能 
文字 の ASCII コー ド ま た は 漢字 連続 コー ド を 知る 

画 書 式 

ASC( 文字 式 ) 

較 引 数 と 戻り 値 










引 数 文字 式 … 知 り た い 文 字 列 を 渡す 
戻り 値 | 先頭 文字 が 半角 な ら ば 、 対 応 す る ASCII コー ド ( 1 一 255) の 整数 が 


返さ れる 。 
先頭 文字 が 全角 な ら ば 、 対 応 する 漢字 連続 コー ド が 返さ れる 。 










一 文例 


) テキ スト ・ ツ ァイル を リス ト す る 
TNPUT "Listing file name = ", source$ 
OPEN source$ FOR BINARY AS 1 
CN AS は 3meNO は 
DO 

ch$ = INPUT$(1, 1) 

TF EOF( 1 ) THEN 

EXIT DO 


ELSETF ASC(ch$) <> &HD THEN 
PRTNT ch$: 
END IF 
LOOP 
CLOSE 1 
END 
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田 ノ ー ト 
ぁ 文字 式 と し て ヌル を 渡す と 、 ラ ンタ イム ・ エ ラー に な る 。 

ERR No. メッ セー ジ 

5 引き 数 が 許さ れる 範囲 で は あり ませ ん 

y 先頭 文字 が 全角 の と き に 返さ れる 「 漢 字 連 続 コ ー ド 」 と は 、 シ フト JIS 漢字 
コー ド 表 の 2 バイ ト 文 字 で ある 必 H8140 以 降 を 、ASCII コー ド に 続く も の と し 
て 256 一 11535 ま で の コー ド を 連続 的 に 付け た コー ド を いう 。 た と えば 、 つ ぎの 
よう に な っ て いる 。 


全角 連続 コー ド 








gd4 


ATNO 


逆 正 接 の 計算 





画 機 能 
逆 正 接 ( ア ー ク タン ジェ ント ) を 求め る 
画 書 式 





ATN( 数 値 式 ) 





較 引 数 と 戻り 値 
引 数 数 値 式 … ラ ジア ン を 渡す 


戻り 値 | ラジ アン の 逆 正 接 を 返す 。 





弄 文 例 


CONST PIT = 3.14593 


PRINT CINT(ATN(1) * 180 / PT) 





< 実行 結果 > 


画 ノ ー ト 

ラジ アン は 、- ァ ヶ /2ー ヶ /2 の 間 で な けれ ば な ら な い 。 

引数 の 型 が 倍 精度 型 の と き は 、 倍 精度 型 の 戻り 値 を 返す が 、 そ れ 以 外 は 、 単 
精度 型 の 戻り 値 に な る 。 

p 参照 関数 : TAN() 
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CDBLO 
倍 精度 弄 実数 へ の 変換 





画 機能 
数 値 を 倍 精度 型 の 実数 に 変換 する 
画 書 式 





CDBL( 数 値 式 ) 





較 引 数 と 戻り 値 
引 数 数 値 式 … 倍 精度 型 の 実数 に 変換 し た い 数 値 を 渡す 


戻り 値 | 倍 精度 型 実 数 に 変換 し た 数 値 が 返さ れる 。 





弄 文 例 


numericExpression = 22 / 7 
| numericReturn# = CDBL(numericExpression ) 
PRINT numericReturn#: numericExpressSioni 22# / 7# 





< 実行 結果 > 


3.142857074737549 3.142857 3.142857142857143 





圏 ノー ト 
数値 の 型 を 変換 する けれ ども 、 引 数 自体 を 倍 精度 ペー ス で 計算 し な いな ら ば 
返さ れる 数 値 は 、 引 数 より も 正確 で ある こと は な い 。 





ヽ 
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CDBL$() 











P バイ ト 文 字 へ の 変換 
画 機能 
1 バイト (半角 ) 文字 を 2 バイ ト (全角 ) 文字 に 変換 する 
還 書 式 
CDBL$( 文 字 列 式 ) 
遼 引 数 戻り 値 


引 数 文字 列 式 … 2 バイ ト 文 字 に 変換 し た い 文 字 列 を 渡す 





1 バイ ト の 部 分 を 2 バイ ト 文 字 に し て 返す 。 


男 文 例 


StringExpreSSion$ = "マイ クロ ソフ ト QuickBASTC4.2" 
stringReturn$ = CDBL$( stringExpreSsSion$ ) 
PRINT stringReturn$: SPC(2): stringExpression$ 


く 実 行 結果 > 





マイ クロ ソフ ト QuickBASTIC 4 . 2 マイクロソフト QuickBASTC4.2 





田 ノ ー ト 

y 2 バイ ト 文 字 に 変換 で きる 1 バイ ト 文 字 は 、ASCII コー ド の 
&H20-&H7E 
&HA1-&HDF 

で ある (「 付 録 ASCII コー ド 表 」 を 参照 の こと )。 
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CHRS() 


ASCII コー ド / 漢 字 連 続 コ ー ド 対応 文字 





画 機能 
ASCII コー ド お よび 漢字 連続 コー ド に 対応 する 文字 を 知る 
一 書 式 





CHRS( コ ー ド 1 [コー ド 2 .…]) 





一 引 数 と 戻り 値 












0 … 得 た い 文 字 の コー ド を 渡す 
コー ド 2 以降 … オ プシ ョ ン の 引数 と し て 渡す こと が で きる 
引数 が ASCII コー ド (255 以 下 ) の と き 、 制 御 文字 また は 1 バイ ト 文 
字 が 返さ れる 。 

引数 が 漢字 連続 コー ド (256 以 上 ) の と き 、 全 角 文 字 ( 2 バイ ト 文 字 ) が 
返さ れる 。 


4 





引 











画 文 例 


PRINT CHR$(65), "A", JIS$("A") 
PRINT JTS$("、" ), CHR$(257 ) ,。 CHR$(VAL("&J2122" ) ) 


PRINT CHR$(344, &H51 。 &H75, &H69, &H63, &H6B, 344) 





く 実 行 結果 > 


A 
2122 


広 Quick 廊 
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田 ノ ー ト 
y 渡す こと の で きる コー ド は 、 以 下 の と お り で ある 。 












10 進 数 が 24 


&0 一 &377| &H0 一 &HFF 
| 25611535 | &400&26417 | &H100 一 &H2D0F 


ASCII コー ド 
漢字 連続 コー ド 






SdHO 
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CINTO 


整数 型 数 値 へ の 変換 





画 機能 

数 値 を 整数 型 の 数 値 に 変換 する 。 小 数 点 以 下 が あ る と き は 四捨五入 し て か ら 
整数 型 に 変換 する 。 
一 書 式 





CINT( 数 値 式 ) 





較 引 数 と 戻り 値 
引 数 数 値 式 … 整 数 型 に し た い 数 値 を 渡す 


戻り 値 | 整数 型 に 変換 され た 数 値 が 返さ れる 。 





画 文 例 


numericReturn1% = CINT(-41.54 ) 
numericReturn2% = CINT(41.54 ) 


PRINT numericReturn1%, numericReturn2% 





< 実 行 結果 > 


圏 ノー ト 
引数 は 、 型 に 関係 な く -32768~32767 の 範囲 内 の 数 値 で な けれ ば な ら な い 。 
引数 が 実数 な ら ば 、 小 数 第 1 位 を 四捨五入 し て か ら 整 数 型 の 数 値 を 返す 。 





g40 


CLNG( 


長 整数 型 数 値 へ の 変換 





軒 機 能 

数 値 を 長 整数 型 の 数 値 に 変換 する 。 小 数 点 以下 が ある と き は 四捨五入 し て か 
ら 長 整数 型 に 変換 する 。 
画 書 式 





CLNG( 数 値 式 ) 





較 引 数 と 戻り 値 
引 数 数 値 式 … 長 整数 型 に し た い 数 値 を 渡す 。 


戻り 値 | 長 整数 型 に 変換 され た 数 値 が 返さ れる 。 





画 文 例 


numericReturn1& = CLNG(-41999.54 ) 


numericReturn2& = CLNG(41999.54 ) 
PRINT numericReturn1&, numericReturn2& 





〇 O 
く 実行 結果 > る 
-42000 42000 
弄 ノ ー ト 


引数 は 、 型 に 関係 な く -2147483648-2147483647 の 範囲 内 の 数 値 で な けれ ば な 
ら な い 。 
ぁ 引数 が 実数 な ら ば 、 小 数 第 1 位 を 四捨五入 し て か ら 長 整数 型 の 数 値 を 返す 。 
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COMMAND$ 


コマ ンド ・ ラ イン ショ | 数 





画 機 能 
MS-DOS の コマ ンド ・ ラ イン 引数 を 得る 
画 書 式 





COMMANDS$ 





較 引 数 と 戻り 値 


戻り 値 | コマ ンド ・ ラ イン の 入力 を 1 つの 文字 列 と し て 返す 。 





田 文 例 


PRTNT COMMAND$ 


< 実行 結果 > 
g -L50 -W70 
上 
上 コ 
由 
還 回 ノー ト 
め 


y QuickBASIC の 環境 下 で は 、 つ ぎの どちら か の 方 法 で 設定 され て いる コマ 
ンド ・ ラ イン 引数 を 返す 。 
※ Quick BASIC の 起動 時 に /CMD オプ ショ ン を 使っ て 設定 し た コマ ンド ・ 
ライ ン 引 数 
※”R/ 実 行 " メ ニュ ー に お ける ”"C/COMMAND$ 入 力 .. .” コマ ンド を 使っ て 
設定 し た コマ ンド ・ ラ イン 引数 
ぁ 実行 可能 ファ イル の 中 で は 、 そ の ファ イル の 起動 時 に お ける コマ ンド ・ ラ イ 
ン 引数 を 返す 。 
コマ ンド ・ ラ イン 引数 が な いと き は 、 ヌ ル を 返す 。 





gg 


COS0 


示 纏 の 計算 





画 機能 
余弦 (コサイン ) を 求め る 
男 書 式 





COS( 数 値 式 ) 





圏 引数 と 戻り 値 
引 数 数 値 式 … ラ ジア ン を 渡す 





戻り 値 | ラジ アン の 余弦 を 返す 。 


田 文 例 


CONST PI = 3.14593 


angle = 60 
PRINT COS(angle * PI / 180) 


で 実行 結果 > 


.4987474 





田 ノ ー ト 
ぁ 参照 関数 : SIN()、TAN() 
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CSNG0 


単 精度 型 数 値 へ の 変換 





画 機 能 

数 値 を 単 精度 型 の 数 値 に 変換 する 。 小 数 点 以下 が ある と き は 適当 な 位 で 四 捨 
五 入 する 。 
国書 式 





CSNG( 数 値 式 ) 





圏 引数 と 戻り 値 





引 数 数 値 式 … 単 精度 型 に し た い 数 値 を 渡す 
戻り 値 | 単 精度 型 に 変換 され た 数 値 が 返さ れる 。 





画 文 例 


numericReturn! = CSNG(41999.77777777777#) 
PRTNT numericReturn!, 41999.77777777777# 





く 実 行 結果 > 


41999.78 41999.77777777777 





田 ノ ー ト 
ぁ 参照 関数 : CINTO 
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CSNGS$() 


] バイ ト 文 字 へ の 変換 (Ver.4.5 拡張) 











男 機 能 
2 バイ ト (全角 ) 文字 を 1 バイト (半角) 文字 に 変換 する 
男 書 式 
CSNGS$( 文 字 列 式 ) 
男 引 数 と 戻り 値 


引 数 文字 列 式 … 1 バイ ト 文 字 に 変換 し た い 文字 列 を 渡す 。 


2 バイ ト の 部 分 を 1 バイ ト 文 字 に し て 返す 。 





画 文 例 


stringExpression$ = "まい ぐろ ぞ ぶ ど ぐい っ ぐ ペ ー じ っ ぐ " 
stringReturn$ = CSNG$( stringExpression$ ) 
PRINT stringReturn$ 


く 実 行 結果 > 





'@】 
の 
選 
「W】 
4 


マイ クロ ソフ ト クイ ッ ク ヘ ペー シック 





圏 ノート 

1 バイ ト 文 字 に 変換 で きる 2 バイ ト 文 字 は 、 変換 後 の 1 バイ ト 文字 が ASCII 
コー ド の &H20 て &H7E &HA1 て 多 HDF に な る も の で ある 。 

ひら が な ・ 潤 音 ・ 破 裂 音 は 半角 の カタ カナ に 変換 され る (Ver.4.5 の み )。 
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| に に 】 


CSRLIN 


カー ソル の 行 位置 





画 機能 
カー ソル が 現在 ある 行 位置 を 知る 
画 書 式 





CSRLIN 





一 引数 と 戻り 値 


戻り 値 | 現在 の カー ソル の 行 位置 を 整数 で 返す 。 


画 文例 


LOCATE 4。 2: PRINT "QuickBASTC" 
numericReturn% = CSRLIN 


PRINT numericReturn% 


< 実行 結果 > 


QuickBAS1IC 
5 


較 ノ ー ト 
カー ソル の 行 位置 は 、1-25 の 整数 で 返さ れる 。 
カー ソル の 桁 位置 を 知る に は 、POS 関数 を 使う 。 


g46 








CVIO /CVLO /CVS0 /CVDO 


数 値 へ の 変換 





還 機 能 
2 バイ ト 文 字 を 整数 型 の 数 値 に 変換 する 
4 バイ ト 文 字 を 長 整数 型 の 数 値 に 変換 する 
4 バイ ト 文 字 を 単 精度 型 の 数 値 に 変換 する 
8 バイ ト 文 字 を 倍 精度 型 の 数 値 に 変換 する 
画 書 式 





CVI( 2 バイ ト 文 字 ) 
CVL( 4 バイ ト 文 字 ) 
CVS( 4 バイ ト 文 字 ) 
CVD( 8 バイ ト 文 字 ) 





田 引 数 と 戻り 値 


引 数 変換 し た い 型 に あっ た 関数 に それ ぞ れ の 引数 を 渡す 。 
2 バイ ト 文 字 … 整 数 型 の 数 値 に 変換 し た い 2 バイ ト 文 字 を 渡す 
4 バイ ト 文 字 … 長 整数 型 の 数 値 に 変換 し た い 4 バイ ト 文 字 を 渡す 。 


()IAO 


4 バイ ト 文 字 … 単 精度 型 の 数 値 に 変換 し た い 4 バイ ト 文 字 を 渡す 
8 バイ ト 文 字 … 倍 精度 型 の 数 値 に 変換 し た い 8 バイ ト 文 字 を 渡す 


戻り 値 | 変換 され た 数 値 が 返さ れる 。 


ミ 
に 
に 
な 
に 
の 
O 
に 
紀 
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9 


ミ 
ご 
UE 
〇 
デ 
の 
る 
デ 
選 





一文 例 


OPEN "Eruit.Dat" FOR RANDOM AS 1 LEN = 12 
FTIELD #1, 10 AS nameF1d$, 2 AS salesF1d$ 
recNum = 1 

PRINT " N A ME amount 『" 


DO 
GET #1, recNum 
TF EOF( 1 ) THEN 
EXIT DO 
END IF 
itName$ = nameF1d$ 
amount = CVI(salesF1d$ ) 
PRINT itName$: " = ": USTNG 「##」###"「: amount 
recNum = recNum + 1 
LOOP 
CLOSE 1 
END 





田 ノ ー ト 
ぁ 参照 関数 : MKI$、MKL$、MKS$、MKD$ 
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CVSMBF() /CVDMBF() 


IEEE フォ ー マ ッ ト 数 値 へ の 変換 





画 機 能 

マイ クロ ソフ ト ・ バ イナ リー・ フ ォ ー マ ッ ト (MBF) の 4 バイ ト 文 字 を 単 精度 
型 の IEEE フォ ー マ ッ ト の 数 値 に 変換 する 。 

マイ クロ ソフ ト ・ バ イナ リー・ フ ォ ー マ ッ ト (MBF) の 8 バイ ト 文 字 を 倍 精度 
型 の IEEE フォ ー マ ッ ト の 数 値 に 変換 する 。 
一 書式 





CVSMBF( 4 バイ ト 文 字 ) 
CVDMBF( 8 バイ ト 文 字 ) 





画 引 数 と 戻り 値 


引 数 4 バイ ト 文 字 … 単 精度 型 IEEE フォ ー マ ッ ト に 変換 し た い MBF4 バ 
イト 文字 を CVSMBF 関数 に 渡す 
8 バイ ト 文 字 … 倍 精度 型 EEE フォ ー マ ッ ト に 変換 し た い MBF8 バ 


と 症 あ 本 北 守り に 1 下 E:469: を 床 
戻り 値 | 単 精度 型 ま た は 倍 精度 型 の IEEE フォ ー マ ッ ト 数 値 を 返す 。 





較 ノ ー ト 
P 日 付 の 設定 は 、DATE ステ ー ト メン ト で 行なえ る 。 


の 
に コ 
1 
コ 
ご 
」 
コ 
ドリ 
寺 
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上 に |「、 ド か 


た に | 、 い 6 





一 文例 


'" データ ・ フ ァイル の 変換 (MBF か ら 1EEE へ ) 
TYPE NBFtype 
itName AS STRING 10 
amount AS STRING 4 
tota] AS SPRING 8 
END TYPE 
TVPE IEEEtype 
itName AS STRING 10 
amount AS SINGLE 
tota1 AS DOUBLE 
FND TYPE 
DIM NBFrecord AS MBFtype, IEEErecord AS IEEEtype 


OPEN "NMBFFILE.dat" FOR RANDOM AS 1 LEN = LEN(NBFrecord) 
OPEN "IEEEFILE.dat" FOR RANDOMN AS 2 LEN = LEN(TEEErecord ) 


recNum = 1 
DO 
GET #1, recNum, MBFrecord 
TF EOF( 1 ) THEN 
EXIT DO 
ELSE 
IEEErecord.1tName = MBFrecord.itName 
TEEErecord.amount = CVSMBF(MBFrecord.amount ) 
TEEErecord.tota1] = CVDMBF(MBFrecord.tota1 ) 
PUT #2, recNum, IEEErecord 
END IF 
recNum = recNum + 1 
LOOP 
CLOSE 1」 2 
END 


田 ノ ー ト 

「 マ イク ロ ソ フト ・ バ イナ リー・ フ ォ ー マ ッ ト (MBF)」 と は 、 実数 を バイ ナ 
リー 文字 列 形式 で 処理 する 方 式 を いい 、 単 精度 型 の 実数 は 4 文字 で 、 倍 精度 の 
実数 は 8 文字 の 文字 列 で 処理 する 。 従 来 の BASIC に お ける ラン ダム アク セス ・ 
ファ イル に お ける 実数 は 、 こ の 形式 で 保存 きれ て いま す 。 

Py「IEEE フォ ー マ ッ ト 」 と は 、 実 数 を MBF より も さら に 精度 の 高い 形式 で 処 
理 する 方 式 で ある 。 

y QuickBASIC を 起動 する と き お よび BC で コン パイ ル す る と き の オ プシ ョ 
ン と し て /MBF が ある (「Vol.1 4・1 Quick BASIC の 起動 」 お よび 「Vol. 
1 9・3 コン パイ ル 」 を 参照 )。 

p 参照 関数 : CVSMBF () /CVDMBF () 


e50 


DATES 
現在 の 日 付 





画 機能 
現在 の クロ ッ ク 日 付 を 知る 
還 書 式 





DATES$ 





較 引 数 と 戻り 値 


ETTTTTETTT7rrr っ 


男 文 例 


year$ = LEFT$(DATES, 4 ) 
month$ = MID$(DATE$, 6, 2) 


day$ = RIGHT$(DATE$, 2) 
PRINT "西暦 " + year$ + " 年 " + month$ + " 月 "+ dav$ + " 日" 





< 実行 結果 > 


$ ヨ VQ 


西暦 1989 年 06 月 14 日 
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ENVIRONS$() 





環境 変数 名 と 環境 文字 列 
琵 能 
MS-DOS の 環境 変数 名 お よび 環境 文字 列 を 知る 
還 書 式 





ENVIRON$( {環境 変数 名 | 環境 設定 番号 }) 





圏 引数 と 戻り 値 
引 数 つき の どちら か を 引数 と し て 渡さ な けれ ば な ら な い 
環境 変数 名 … 知 り た い 設 定 内容 に 対応 する 環境 変数 名 を 文字 列 に 
1 の: を 』 


環境 設定 番号 … n 番目 に 設定 され て いる 環境 変数 名 と その 環境 文字 
列 の 両方 を 知り た いと き は 、 そ の 番号 を 数 値 に し て 
渡す 

引数 と し て 環境 変数 名 を 渡す と 、 そ の 設定 内 容 で ある 環境 文字 列 だ 

けが 返さ れる 。 

引数 と し て 環境 設定 番号 を 渡す と 、 そ の 環境 変数 名 と その 設定 内 容 

で ある 環境 文字 列 が 

環境 変数 名 環境 文字 列 
の 文字 列 形式 で 返さ れる 。 











0 に い (et! 


e5g 


較 文 例 


WW SFET 


ENVIRON$( “PATH" ) 
ENVIRONS(“LIB" ) 


ENVIRON$( 1 ) 
ENVT RON$ ( 2 ) 
ENVIRON$( 3 ) 





く 実行 結果 > 


COMSPEC=\COMMAND .CON 
PROMPT=$P$G 
PATH=A:\STUFF:A:\DOSjA:\QB\BIN 
LTB=A:\QBYLTB 


A:\STUFF:A:\DOS iA:\QB\BIN 
A:\QB\LTB 

COMSPEC=\COMMAND.COM 
PROMPT=$P$G 

PATH=A :\STUFF:A:\DOS:A:\QB\BTN 





圏 ノー ト 

引数 で ある 環境 変数 名 は 、 大 文字 で な けれ ば な ら な い 。 
引数 で ある 環境 設定 番号 は 、 1 255 の 範囲 内 で な けれ ば な ら な い 。 
ル 引数 に 該当 する も の が な いと き は 、 ヌ ル が 返さ れる 。 


中 
テ 
に] 
P リ 
【e) 
F 
0 
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0E【e に | 


EOF() 











ファ イル の 終わ り の テス ト 
画 機 能 
ファ イル の 終わ り (END OF FILE) か どう か を 調べ る 
還 寺 
EOF( フ ァイル 番号 ) 
一 引 数 と 戻り 値 


引 数 ファ イル 番号 … オ ー プ ン し た と き に 割り 当て た ファ イル 番号 (整数 
型 ) を 渡す 


戻り 値 ファ イル の 終わ り の と き 、 -1( 真 ) を 返す 。 





画 文 例 


TYPE FoodRecType 
itName AS STRING * 10 
amount AS INTEGER 
END TYPE 

DIM fruit AS FoodRecType 


OPEN "Fruit.Dat" FOR RANDOM AS 1 LEN = LEN(fruit) 
recNum = 1 
PRINT " NAMNE amount 『" 


DO 
GET #1, recNum 
TEF EOF( 1 ) THEN 


EXIT DO 
END IF 


PRINT fruit.itNamei " = "j USTNG "##,###" 」 fruit.amount 
recNum = recNum + 1 

LOOP 

CLOSE 1 

END 
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圏 ノー ト 
オー プン し た ファ イル の 形態 に よ に っ て 、 フ ァイル の 終わ りか どう か を 調べ る 
タイ ミン グ が 異な る の で 注意 し て 使わ な けれ ば な ら な い 。 








シー ケン シャ ル 
ラン ダム アク セス 
バイ ナリ ー 





新しい デー タ を 読み 込む 前 に テス ト す る こと 
デー タ を 読み 込ん だ 後 で テス ト す る こと 
デー タ を 読み 込ん だ 後 で テス ト す る こと 








P 参照 ステ ー ト メン ト : OPEN、INPUT#、 GET# 
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ドル ヒ (に ヒ リ ム に 【 に | 





ERDEV/ERDEVS$ 


エラ ー・ コ ー ド と デパ イス 名 





画 機 能 

致命 的 な デバ イス ・ エ ラー が 生じ た と き の エ ラー・ コ ー ド と その デバ イス 名 
を 知る 。 
画 書 式 





ERDEV/ERDEVS 





男 引 数 と 戻り 値 


戻り 値 | ERDEV 関数 は 、 致 命 的 エラ ー・ コ ー ド を 返し 、ERDEV$ 関 数 は 、 
その デバ イス 名 を 返す 。 





画 文 例 


ON ERROR GOTO ErrorHandleRoutine 
10 "FileOpen ... 
CLS 
OPEN "B:Fruit.dat" FOR RANDOM AS 1 
OPEN "B:Animal1.dat" FOR RANDOM AS 2 
20 'DateRead 


ErrorHandleRoutine: 
PRINT "Error Number 
PRINT "Error Code 
PRINT “Error Device 
PRINT "Error itCode 
RESET 
END 


ERL 

ERR 

ERDEV$ 

ERDEV MOD &H100 
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く 実行 結 果 > 


Error Number 
Error Code 

Error Device 
Rrror jtCode 





圏 ノー ト 

y ERDEV 関数 は 、DOS に お ける 割り 込み タイ プ 24H の エラ ー 処 理 が 行なわ 
れ た と き の DI に お ける エラ ー・ コ ー ド (下位 バイ ト ) と エラ ー 属 性 ワー ド (上 位 
バイ ト ) を 返す 。 
















ディ スク が ライ ト ・ プ ロ テ ク ト に な っ て いる 
ユニ ッ ト が 存在 し な い 

ドラ イプ に ディ スク が セッ ト さ れ て いな い 
コマ ンド が 存在 し な い 

CRC チェ ッ ク ・ エ ラー が 発生 し た 

不適 当 な スト ラク チャ ー・ サ イズ 
アク セス で き な い 

デバ イス が 存在 し な い 

セク タ が 存在 し な い 

プリ ンタ ー が ペー パー・ ア ウト に な っ た 
書き 込み で き な い 
読み 込み で き な い 
ディ スク が 壊れ て いる 


&H01 
&H02 
&H03 
&H04 
&H05 
&H06 
&H07 
&H08 
&H09 
&H0A 


ドル に! に ビリ (6 に に | 
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1H ヨ 


ERL 


エラ ー 発 生 の 行 番号 











画 機能 
エラ ー が 発生 し た 行 番号 を 知る 
囲 書式 
ERL 
較 引 数 と 戻り 値 


戻り 値 | エラ ー が 発生 し た 行 番号 を 返す 。 





画 文 例 


100 ON ERROR GOTO ErrorHandleRoutine 
110 FileOpen: 

120 OPEN "Fruit.dat'*: FOR RANDON AS 1 
130 OPEN "Animal.dat" FOR RANDON AS 1 
140 DateReadi 


900 ErrorHandleRowtine: 

910 PRINT "Error Number = "| FRRL 
920 PRINT "Error Code =": ERR 
930 RESET 

940 END 





< 実行 結果 > 


Error Number = 130 
Error Code に 地 )1) 


較 ノ ー ト 

ソー ス ・ プ ログ ラム に 行 番号 が 付い て いる と き は その 行 番 号 を 返し 、 付 いて 
いな いと き は 0 が 返さ れる 。 

y 参照 ステ ー ト メン ト : ON ERROR 

p 参照 関数 : ERR 、ERDEV$、ERDEV 


5B 


ERR 











エラ ー・ コ ー ド 
男 機 能 
エラ ー の コー ド を 知る 
較 書 式 
ERR 
較 引 数 と 戻り 値 


戻り 値 | 発生 し た エラ ー の コー ド を 返す 。 





画 文 例 


ON ERROR GOTO ErrorHandleRoutine 
Fi1eOpen: 
OPEN "Fruit.dat" FOR RANDOM AS 1 
OPEN "Anima1.dat" FOR RANDOH AS 1 
DateRead: 


ErrorHandleRoutine: 
PRINT "Error Number 
PRINT "Error Code 
RESET 





く 実 行 結果 > 


Error Number 


Error Code 





田 ノ ー ト 

エラ ー・ コ ー ド に つい て は 、「 付 録 」 を 参照 の こと 。 
Py 参照 ステ ー ト メン ト : ON ERROR 

ぁ 参照 関数 : ERL 、 ERDEV$、ERDEV 
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EXP( 
指数 関数 の 計算 





画 機 能 
自然 対数 の 底 e(2.71828.. .) の べき 乗 を 計算 する 
一 書 式 





EXP( x ) 





田 引 数 こ 戻 り 値 
引 数 x…x 乗 し た いと き の x を 渡す 


戻り 値 | 計算 し た 指数 関数 を 返す 。 





田 文 例 


x = 2 
PRINT EXP(x) 





< 実行 結果 > 


7.389056 


ノ ー ト 
ぁ 参照 関数 : LOGO 
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FILEATTR0 


ファ イル ・ モ ー ド 





画 機 能 
オー プン し て いる ファ イル の モー ド を 知る 


画 書 式 





FILEATTR( フ ァイル 番号 , 種類 ) 





画 引 数 と 戻り 値 


引 数 | ファ イル 番号 … オ ー プ ン し た と き に 割り 当て た ファ イル 番号 を 渡す 。 
種類 … 知 り た い モ ー ド の 種類 の コー ド を 渡す 。 


コー ド | 
| 1 | オー プン し た と き の モ ー ド 
| 2 | MS-DOS の ファ イル ・ ハ ンド ラー 


戻り 値 | 情報 を 数 字 コ ー ド て 返す 。 
種類 コー ド と し て 1 を 渡し た と き の 戻 り 値 は 、 つ ぎの よう に な っ て 
いる 。 1 
39 ファ イル ・ モ ー ド 


答 給 INPUT( シ ー ケ ン シ ャ ル ) 
| 2? | ouTPuT( シ ー ケ ン シ ャ ル ) 
人 | APPEND( シ ー ケ ン シ ャ ル ) 


| 4 | RANDOM( ラ ンダ ム ア ク セス ) 


凡 ( 入 BINARY (バイ ナリ ー) 


半 
中 
同 
ち 
四 | 
に 
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(dLLY ヨ TH 


画 文 例 


OPEN "Fruit.Dat" FOR RANDOM AS 1 LEN 
PRINT FILEATTR(1, 1 ) , FTLEATTR(1, 2) 


CLOSE 


< 実行 結果 > 


圏 ノー ト 


g6e 


LEN(fruit ) 





FIX() 


小数 点 以 下 の 切り 捨て 





画 機能 
小数 点 以下 を 切り 捨て 、 整 数 部 を 取り 出す 
下 書 式 





FIX( 数 値 式 ) 





田 引 数 と 戻り 値 
引 数 数 値 式 … 切 り 捨て た い 数 値 を 渡す 。 


小数 点 以下 を 切り 捨て て 整数 部 だ け を 返す 。 





還 文 例 


numericReturn1% FIX(-41.54 ) 


numericReturn2% = FIX(41.54 ) 
PRINT numericReturn1%: numericReturn2% 


< 実行 結果 > 





田 ノ ー ト 

y 引 数 は 、 型 に 関係 な く -32768~-32767 の 範囲 内 の 数 値 で な けれ ば な ら な い 。 

y INT 関数 と の 違い は 、 引 数 x が 正 数 の と き は 同じ 値 を 返す が 、x が 負数 の と 
き に は INT 関数 は x より も 小さ く x に 最も 近い 整数 を 返す の に 対し 、FIX 関 
数 は x よ り も 大 きく て x に 最も 近い 整数 を 返す 。 

p 参照 関数 : INT() 
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FREO 


利用 可能 な メモ リー・ サ イズ 





画 機 能 
利用 可能 な メモ リー・ サ イズ を 知る 
画 書 式 





FRE({ 数 値 式 | 文字 式 )) 





較 引 数 と 戻り 値 








引 数 | 数 値 式 …-1、-2、 そ の 他 の 数 値 を 渡す 。 









文字 列 用 の メモ リー・ サ イズ 


文字 式 … 任意 の 文字 を 渡す と 文字 列 用 の メモ リー・ サ イズ を 知る こ 
と が で きる 。 


戻り 値 | 利用 可能 な メモ リー・ サ イズ を 返す 。 





弄 文 例 


PRINT FRE( -1 ) , FRE( -2 ) , FRE( 1 ) , FRE( "dummy" ) 
< 実行 結果 > 


144296 1152 46344 46344 


田 ノ ー ト 
ぁ 参照 関数 : SEPTMEM() 
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FREEFILE 


使用 可能 な ファ イル 番号 





画 機能 

未 使 用 の ファ イル 番号 を 知る 。 こ れ を 使っ て 次 に オー プン する ファ イル に 新 
し い フ ァイル 番号 を 割り 当て る こと が で きる 。 
男 書 式 





FREEFILE 





較 引 数 と 戻り 値 


戻り 値 | 使用 可能 な ファ イル 番号 を 数 値 で 返す 。 





一文 例 


TYPE FoodRecType 
itName AS STRING * 10 
amount AS TNTEGER 
END TYPE 

DIM 『ruit AS FoodRecTYpe 


FruitFilelD = FREEFLLE 
OPEN "Fruit.Dat" FOR RANDOM AS FruitFileTD LEN = LEN(fruit ) 
recNum = 1 

PRINT " N A NE amount 『" 


上 | ヒヒ E に に | 


DO 
GET FruitFileiD,、 recNum, fruit 
IF EOF(FruitFiletD) THEN 
EX1T DO 





END ITF 
PRINT fruit,itNamei "=") USTNG ます 」## き まり": fru1t.amount 
recNum = recNum + 1 

LOOP 

CLOSE FruitFiletD 

END 
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ElEEE に | 


< 実行 結果 > 


き 8mOunt 





圏 ノー ト 
Py 参照 ステ ー ト メン ト : OPEN、GET #、 PUT #、 WRITE、 NPUT #、 CLOSE 
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HEX$() 


16 進 表現 の 文字 列 





画 機 能 
数 値 を 16 進 表現 の 文字 列 に 変換 する 
還 書 式 





HEX$( 数 値 式 ) 





較 引 数 こ 戻 り 値 
引 数 数 値 式 …16 進 表現 の 文字 列 に し た い 数 値 を 渡す 


16 進 表現 の 文字 列 に し て 返す 





一文 例 


true = -1 


PRINT HEX$(VARSEG( true ) ) , HEX$(VARPTR(true ) ) 





く 実 行 結果 > 


0 よう 5 


7787 44DA 


較 ノ ー ト 
* 引数 が 実数 な ら ば 、 小 数 第 1 位 を 四捨五入 し て か ら 文 字 列 に 変換 する 。 
戻り 値 の 文字 列 に は 、 先 頭 に &H は 付か な い 。 
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トカ モ し |、 | 


INKEYS 


キー ボー ド か ら の 1 文字 











画 機能 
キー ボー ド か ら 1 文字 を 読み 込む 
一 書 式 
INKEY$S 
画 引 数 と 戻り 値 


引 数 な し 
戻り 値 | 押さ きれ た キー の 文字 また は コー ド を 文字 列 で 返す 。 


CONST Nu11 = “"" 
CLS 
DO 

LOCATE 1。 1 

PRINT TIMES 

presSs$ = INKEYS 
LOOP UNTIL press$ <> Nu11 
TEF (LEN(press$) = 2) THEN 
PRINT HEX$(ASC(LEFTS(press$, 1))) + HEX$(ASC(RIGHTS(press$,。 1 ) ) ) 
ELSE 

PRINT HEX$(ASC(press$ ) ) 
END IF 


< 実行 結果 > 


19:01:44 
1B 


圏 ノー ト 

ぁ 何 も 押さ れ な いと き は 、 ヌ ル が 返さ れる 。 

Py 全角 文字 は 、 シ フト JIS コー ド で 返す 。 

キー ボー ド 上 の キー は 、 キ ー・ コ ー ド が 返さ れる (付録 を 参照 の こと ) 
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INP0 


I/O ポー ト か ら 1 バイ ト 





画 機 能 
I/O ポー ト か ら 1 バイ ト 読 み 込む 
還 書 式 





INP( ポ ー ト 番号 ) 





較 引 数 と 戻り 値 


引 数 ポー ト 番 号 … 読 み 込み た い ポ ー ト を オー プン し た と き に 割り 当て た 
ファ イル 番号 を 渡す 





戻り 値 | 読み 込ま れ た デー タ が 返さ れる 。 


画 文 例 


PRINT INP(2) 


< 実行 結果 > 


57 


圏 ノー ト 
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INPUTS() 


バイ ト 単 位 で の ファ イル 読み 込み 





軒 機 能 
指定 し た ファ イル か ら 指 定 し た バイ ト 数 だ け 読 み 込む 
一 書式 





INPUT$S( バ イト 数 [, [ 訂 ファ イル 番号 ]) 





較 引 数 と 戻り 値 


引 数 バイ ト 数  … 読 み 込み た い バ イト 数 を 渡す 
ファ イル 番号 … 読 み 込 みた い フ ァイル に 割り 当て た ファ イル 番号 を 


渡す 
戻り 値 | 指定 し た バイ ト 数 を 文字 列 と し て 返す 。 





男 文 例 


TINPUT "Listing fi]e name = ", source$ 


OPEN source$ FOR BINARY AS 1 
TOT 
DO 

ch$ = INPUT$(1, 1 ) 

TF EOF( 1 ) THEN 


EXTT DO 
ELSEIF ASC(ch$ ) <> &HD THEN 
PRINT ch$: 
END IF 
LOOP 
CLOSE 1 
END 
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< 実行 結果 > 


Listing file name = README .DOC 





圏 ノー ト 
読み 込め る バイ ト 数 は 、 フ ァイル の タイ プ に よっ て 異な る 。 








レル ルリ ノル 4 





読み 込み 可能 な バイ ト 数 
32767 バ イト 以下 で な けれ ば な ら な い 。 














シー ケン シャ ル 
バイ ナリ ー 
ラン ダム アク セス 








1 レコ ー ド 長 以下 で な けれ ば な ら な い 。 





p ファ イル 番号 を 省略 し た と き は 、 標 準 入力 (CON : ) か ら 読み 込ま れる 。 
ぁ 参照 関数 : INPUT\() 、LOF() 
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INPUT \0 








文字 数 単位 で の ファ イル 読み 込み 
画 機能 
指定 し た ファ イル か ら 指 定 し た 文字 数 だ け 読 み 込む 。 半 角 ・ 全 角 の 区 別 な く 
読み 込め る 。 
一 書 式 





INPUT ぜ (文字 数 [, [ 計 ファ イル 番号 ]) 





田 引 数 と 戻り 値 


… 読 み 込み た い 文字 数 を 渡す 
読み 込み た い フ ァイル に 割り 当て た ファ イル 番号 を 


渡す 
戻り 値 | 指定 し た 文字 数 を 読み 込ん て 文字 列 と し て 返す 。 





一文 例 
INPUT "Listing file name = "', Source$ 


OPEN source$ FOR BINARY AS 1 
ch$ = "": 1ineNo = 1 
DO 

ch$ = INPUT\(1, 1) 

TEF EOF( 1 ) THEN 


上 
で 
「 = 
に | 
素 


EXIT DO 
ELSETF ASC(ch$) <> &HD THEN 
PRINT ch$: 
END IF 
LOOP 
CLOSE 1 
END 
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< 実行 結果 > 


Listing file name = README.DOC 





圏 ノー ト 
y 読み 込め る バイ ト 数 は 、 フ ァイル の タイ プ に よっ て 異な る 。 










ファ イル の タイ プ 読み 込み 可能 な 文字 数 
32767 バ イト 以下 で な けれ ば な ら な い 。 






シー ケン シャ ル 
また は 
バイ ナリ ー 


ラン ダム アク セス 








1 レコ ー ド 長 以下 で な けれ ば な ら な い 。 


ファ イル 番号 を 省略 し た と き は 、 標 準 入力 (CON : ) か ら 読み 込ま れる 
ぁ 参照 関数 : INPUT$() 、 LOF() 


o 
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INSTR0) 





文字 列 の 位置 
画 機 能 
ある 文字 列 が 別 の 文字 列 の な か に 存在 する と き の そ の 位置 を 知る 
画 書 式 





INSTR([ 開 始 位置 ], 文字 式 1, 文字 式 2) 





画 引 数 と 戻り 値 
引 数 開始 位置 … 文 字 式 1 の 中 の 何 文字 目 以降 の 中 を 調べ る か を 指定 する 。 


文字 式 1 … 検 索 さ れる 文字 列 (この 文字 列 の 中 を 探す ) 
文字 式 2 … 検 索 し た い 文字 列 (この 文字 列 を 探す ) 


文字 式 1 の 中 に 文字 式 2 ある な ら ば 、 文 字 式 2 の 先頭 文字 が 存在 す 


る 位置 を 数 値 で 返す 。 
存在 し な いな ら ば 、 0 を 返す 。 










較 文 例 


DECLARE SUB analyzePath (nest! aDrv$, aDir$( ) , aPathName$ ) 


DIM dirNawes$(1 TO 101 
driveNames = "": pathName$ = "AiWQBYPROGRAMWDOSCALLSYFILES" 


1evel = 0 


CALL analyzePath(level,。 driveName$。 dirNames$( ) 。 pathName$ ) 
PRINT driveName$ 
FOR i = 1 TO level 
PRINT dirNames$(i) 
NEXT 1 
END 
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SUB analyzePath (nest, aDrv$。 aDir$( ) , aPathName$ ) 
nest = 1: start = 1: position = 0 
DO 
position = INSTR(start,。 aPathName$。 "Y") 
IF ((start = 1) AND (INSTR(aPathName$。 ":") >= 1) 


) THEN 

aDrv$ = LEET$(aPathName$ 。 INSTR(aPathName$,。 ":") ) 

ELSEIF ((start = 1) AND (INSTR(aPathName$。 ":") = 0) ) THEN 
aDrvS = "" 

ELSEIF (position <> 0) THEN 
aDir$(nest) = MIDS(aPathName$ , start。 position - start ) 
nest = nest + 1 

ELSE 
aDir$(nest) = RIGHTS(aPathName$, LEN(aPathName$) - start + 1) 

END IF 

start = position + 1 

LOOP UNTIL (position = 0) 
END SOB 





く 実 行 結果 > 


A: 
QB 


PROGRAM 
DOSCALLS 
FILES 





田 ノ ー ト 
ぁ 文字 の 位置 が 、 バ イト 単位 で 数 える 。 
ぁ 参照 関数 : LEN() 


9 に に | 
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INTO 


小数 点 以下 の 切り 捨て 





画 機能 
小数 点 以下 を 切り 捨て 、 整 数 部 を 取り 出す 
画 書 式 





INT( 数値 式 ) 





較 引 数 と 戻り 値 
引 数 数 値 式 … 切 り 捨 て た い 数 値 を 渡す 


小数 点 以下 を 切り 捨て て 整数 部 だ け を 返す 。 





還 文 例 







numericReturn1% = INT(-41.54 ) 
numericReturn2% = INT(41.54 ) 
PRINT numericReturn1%。 numericReturn2% 





< 実行 結果 > 


-42 41 


田 ノ ー ト 
Py マイ ナス の と き は 、 よ り 小 さい 負 の 整数 に な る 。 
p 参照 関数 : FIX () 、CINT() 
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IOCTLS( 


デバ イス ・ ド ライ バ か ら の 読み 取り 





画 機 能 
デバ イス ・ ド ライ バ か ら 制 御 デ ー タ を 読み 取る 。 
男 書 式 





IOCTL$([ 訂 ファ イル 番号 ) 





較 引 数 と 戻り 値 





引 数 ファ イル 番号 … デ バイ ス ・ ド ライ バ を オー プン し た と き に 割り 当 
て た ファ イル 番号 を 渡す 


戻り 値 | デバ イス ・ ド ライ バ か ら の 制御 文字 デー タ を 返す 。 





男 文 例 


OPEN "\Driver\HardCopy" OUTPUT AS 1 


echo$ = IOCTL$(1 ) 





10 ト alie el| 


圏 ノー ト 
ぁ 参照 ステ ー ト メン ト : IOCTL 
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JIS$() 


り JIS コード 





画 機 能 
文字 の JIS コー ド を 知る 。 


画 書 式 





JIS$( 文 字 式 ) 





田 引 数 と 戻り 値 







数 文字 式 …JIS コー ド を 知り た い 文 字 ま た は 文字 式 を 渡す 
文字 また は 文字 式 の 先頭 文字 の JIS コー ド を 文字 列 で 返す 。 









引 





田 文 例 


PRINT CHRS(65), "A", JTSS("A") 
PRINT JISS("、")。 CHRS(257 )。 CHRS(VAL("&J2122" ) ) CHR$(VAL("&KO102" ) ) 





く 実 行 結果 > 





圏 ノート 

戻り 値 は 、 引 数 が 1 バイ ト な ら ば 10 進 形式 で 、 2 バイ ト な ら ば 16 進 形式 で 返 
され る 。 

p 参照 関数 : KTN$、CHR$() 
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KEXTS() 


文字 の 抽出 





画 機 能 

文字 列 に 含ま れ て いる 文字 の 中 か ら 半 角 文 字 ま た は 全角 文字 の どちら か を 抽 
出す る 。 
画 書 式 





KEXTS( 文 字 式 , 区 分 ) 





田 引 数 と 戻り 値 


引 数 文字 式 … 抽 出し た い 文 字 が 含ま れる 文字 式 を 渡す 
区 分 … 半 角 だ け を 抽出 し た いと き は 0 を 、 全 角 文 字 だ け を 抽出 し 


た いと き は 1 を 渡す 
戻り 値 | 指定 し た 区 分 に 合う 文字 ぞ け か ら な る 文字 列 が 返さ れる 。 





還 文 例 


hankaku = 0: zenkaku = 1 


PRINT KEXT$("QuickB ASIC.2" , zenkaku ) 





< 実行 結果 > 


QB 


固 ノ ー ト 
y 該当 する 文字 が 含ま れ て いな いと き は 、 ヌ ル が 返さ れる 。 
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KINSTR0) 


文字 位置 





画 機 能 

ある 文字 列 が 別 の 文字 列 の な か に 存在 する と き の そ の 位置 を 知る 。 半 角 ・ 全 
角 に 関係 な くそ れ ら を 1 文字 と し て 数 える 。 
一 書 式 





KINSTR([ 開 始 位置 ], 文字 式 1, 文字 式 2) 





較 引 数 と 戻り 値 
引 数 開始 位置 … 文 字 式 1 の 中 の 何 文字 目 以降 の 中 を 調べ る か を 指定 する 


文字 式 1 … 検 索 さ れる 文字 列 ( こ の 文字 列 の 中 を 探す ) 
文字 式 2 … 検 索 し た い 文 字 列 (この 文字 列 を 探す ) 


文字 式 1 の 中 に 文字 式 2 ある な ら ば 、 文 字 式 2 の 先頭 文字 が 存在 す 
る 位置 を 数 値 で 返す 。 
存在 し な いな ら ば 、 0 を 返す 。 










男 文 例 


円 
テ 
の 
コ 
F リ 


position = KINSTR("QuickBAS1TC4.2", "BASTIC") 


PRTINT position 





く 実行 結果 > 





圏 ノー ト 
ぁ 参照 関数 : INSTR() 
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KLEN0 





画 機 能 
文字 列 の 文字 数 を 知る 。 半 角 も 全角 も 1 文字 と し て 数 える 。 
男 書 式 





KLEN( 文字 式 ) 





田 引 数 と 戻り 値 
引 数 文字 式 … 文 字数 を 知り た い 文字 式 を 渡す 。 


文字 数 が 返さ れる 。 





弄 文 例 


1etterNum = KLEN("qguickB AS TOC4.2") 


PRINT letterNum 





く 実 行 結果 > 


圏 ノー ト 
ぁ 参照 関数 : LEN() 
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KMID$() 


部 分 文字 列 の 抽出 





画 機 能 
文字 列 の 中 の 部 分 文字 列 を 取り 出す 。 
男 書 式 





KMIDS( 文 字 式 , 開始 位置 , [, 文字 数 ]) 





圏 引数 と 戻り 値 


引 数 文字 式 … 元 に な る 文字 列 を 渡す 
開始 位置 取り出す 部 分 文字 列 が 文字 式 の 中 で 始ま る 位置 を 文字 式 
の 先頭 か ら 半 角 ( 1 バイ ト ) 単位 で 数 えて 数 値 で 渡す 。 
… 取 り 出す 文字 数 を 文字 式 の 先頭 か ら 半角 ・ 全 角 に 関係 な 


く 数 えた 文字 数 を 数 値 で 渡す 


引数 の 文字 式 の 中 の 開始 位置 より 文字 数 だ け 取 り 出 し て 文字 列 て 返 
す 。 





画 文 例 


1anguage$ = KMID$("QuickB AS 1T C4.2", 6, 5) 


PRINT 1anguage$ 





実行 結果 > 





BAS1IC 


Be 


田 ノ ー ト 

引数 で ある 開始 位置 は 、1~32767 の 範囲 の 数 値 で な けれ ば な ら な い 。 
引数 で ある 文字 数 は 、 省 略 可 能 で ある が 指定 する と き は 0~32767 の 範囲 の 数 
値 で な けれ ば な ら な い 。 

p その 開始 位置 お よび 文字 数 が 実数 な ら ば 、 小 数 第 1 位 で 四捨五入 され る 。 

y その 開始 位置 が 文字 式 の 長 さ を 超え て いる か 、 ま た は その 文字 数 が 0 な ら ば 、 
ヌル が 返さ れる 。 

引数 で ある 文字 数 を 省略 する か 、 ま た は その 文字 数 が 開始 位置 か ら 未 尾 ま で 
の 文字 数 を 超え を て いる な ら ば 、 開 始 位置 か ら 未 尾 ま で の 文字 列 が 返さ れる 。 

ぁ 参照 関数 : KLEN() 、KPOS() 
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KPOS0) 





文字 の 位置 
還 失 能 
ある 文字 列 に お いて 1 文字 目 の 文字 が 何 バ イト に ある か を 知る 。 
男 書 式 





KPOS( 文 字 式 , n) 





圏 引数 と 戻り 値 


検索 の 対象 に な る 文字 列 を 渡す 
… 調 べた い 文 字 の 文字 位置 が 何 文字 目 に ある か を 数 値 で 渡す 
( n は 正 数 ) 


戻り 値 | n く = KLEN( 文 字 式 ) な ら ば 、 先 頭 か ら の バイ ト 位 置 を 返す 。 
n>KLEN( 文 字 式 ) な ら ば 、 0 を 返す 。 





画 文 例 


PRINT KLEN("quickBAS 


0 "人 
bytePos = KPOS("quickB AS 


) 
T Ci4。2> 8) 


PRINT bytePos 





< 実行 結果 > 


13 
10 





較 ノ ー ト 
ぁ 参照 関数 : KLEN () 


g84 


KTNS$() 
殺 宙 コ ー ド 





画 機能 
文字 の 句点 コー ド を 知る 。 
一 書式 





KTN$( 文 字 式 ) 





画 引 数 と 戻り 値 








数 文字 式 … 句 点 コ ー ド を 知り た い 文 字 ま た は 文字 式 を 渡す 
文字 また は 文字 式 の 先頭 文字 の 句点 コー ド を 文字 列 で 返す 。 


9 










一文 例 


PRINT CHR$(65), "A"', JIS$("A" ) 。 KTN$("A" ) 


PRINT KTN$("、"), CHR$(257 ) , CHR$(VAL("&KO102" ) ) 





く 実 行 結果 > 

A A 65 65 
0102 ミ 、 

圏 ノー ト 





ぁ 参照 関数 : JIS$、CHR$ () 
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切 
ら 
ご 
ヒコ 
ロ 





LBOUND0) 


添字 の 下限 





画 機 能 
配列 に お ける 添字 の 下限 を 知る 
画 書 式 





LBOUND( 配 列 名 [, 次 元 ]) 





田 引 数 こ 戻 り 値 


引 数 配列 名 … 下 限 を 知り た い 配 列 の 名 前 を 渡す 
次 元 … 下 限 を 知り た い 配 列 の 次 元 を 渡す 


戻り 値 | 指定 し た 配列 の 次 元 の 下限 を 返す 。 





較 文 例 


DIM matrix(1980 TO 1999, 1 TO 12) 


PRINT LBOUND(matrix ) , LBOUND(matrix, 2) 





く 実 行 結果 > 
1980 1 
較 ノ ー ト 
y 次元 を 省略 する と 、 1 次 元 を 指定 し た こと に な る 。 


p 参照 ステ チー トメント : DIM 
ぁ 参照 関数 : UBOUND() 


g86 


LCASES() 











小文字 へ の 変換 
画 機 能 
文字 列 に お ける アル ファ ベッ ト の 大 文字 部 分 を 小文字 に 変換 する 
較 書 式 
LCASES( 文字 式 ) 
較 引 数 と 戻り 値 


引 数 文字 式 … 小 文字 に 変換 し た い 大 文字 を 含む 文字 式 を 渡す 。 





大 文字 の 部 分 を 小文字 に し た 文字 列 を 返す 。 


男 文 例 


PRINT LCASE$("QuickBasic4.2") 





< 実行 結果 > 


9 たと に いん | 


GMCKD aiCi4: 2 


較 ノ ー ト 

アル ファ ベッ ト の 大 文字 と し て 、 
半角 の A て Z 

全角 の AZ 

の どちら で も よい 。 

ぁ 参照 関数 : UCASES () 
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LEFTS() 


文字 列 の 左端 部 分 の 抽出 





画 機能 
文字 列 の 左端 部 分 を 取り 出す 
田 書 式 





LEFTS( 文 字 式 , 文字 数 ) 





圏 引数 と 戻り 値 


引 数 文字 式 … 元 に な る 文字 列 を 渡す 
文字 数 … 取 り 出 す 文 字数 を 文字 式 の 先頭 か ら 半 角 ( 1 バイト) 単位 て 


数 えて 数 値 で 渡す 
引数 の 文字 式 の 先頭 か ら 文字 数 だ け 取 り 出 し て 、 文 字 列 で 返す 。 





画 文 例 


quick$ = LEFT$("QuickBASIC4.2", 5) 


PRINT quick$ 





く 実 行 結果 > 


田 ノ ー ト 

引数 で ある 文字 数 は 、0~-32767 の 範囲 の 数 値 で な けれ ば な ら な い 。 

yp その 文字 数 が 実数 な ら ば 、 小 数 第 1 位 で 四捨五入 され る 。 

Py その 文字 数 が 0 な ら ば 、 ヌ ル が 返さ れる 。 

y その 文字 数 が 文字 式 の 長 さ を 超え る な ら ば , 文字 式 と 同じ 文字 列 が 返さ れる 。 
ぁ 参照 関数 : MID$、RIGHT$、INSTR 





g88 


LEN0 


文字 列 の 長 さ / 変 数 の バイ ト ・ サ イズ 





画 機 能 
文字 列 の バイ ト 長 ま た は 変数 の バイ ト ・ サ イズ を 知る 
一 書式 





LEN({ 文 字 式 | 変数 名 }) 





画 引 数 こと 戻り 値 


引 数 文字 式 … バ イト 長 を 知り た い 文 字 式 を 渡す 
変数 名 … バ イト ・ サ イズ を 知り た い 変 数 の 名 前 を 渡す 


バイ ト 数 で その 長 さ また は サイ ズ が 返さ れる 。 





画 文 例 


TYPE userTyjpe 
userName AS STRING * 10 
Year INTEGER 
month S INTEGER 
day S INTEGER 


END TVPE 

DINM userInfo AS userType 
sizeOf = LEN(usertnfo) 
PRINT sizeOf 





< 実行 結果 > 


圏 ノー ト 

引数 と し て 変数 名 を 使う と き は 、 文 字 列 型 で な むく て も よい 。 
ぁ 参照 ステ ー ト メン ト : OPEN 

ぁ 参照 関数 : KLEN() 
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0ie』 


LOCO 


ファ イル 上 の 現在 位置 





画 機 能 
ファ イル 上 に お ける 現在 の 位置 (最後 に アク セス し た 位置 ) を 知る 


画 書 式 





LOC( フ ァイル 番号 ) 





圏 引数 と 戻り 値 


引 数 ファ イル 番号 … 知 り た い フ ァイル の オー プン 時 の ファ イル 番号 を 渡 
す 


戻り 値 | ファ イル 内 に 位置 を 数 値 で 返す 。 









一文 例 


TYPE FoodRecTybe 
itName AS STRING * 10 
amournt AS INTEGER 
END TYPE 

DIM fruit AS FoodRecType 


FruitFiljojD = FRFEFILE 

OPEN "Fruit.Dat" FOR RANDOM AS FruitFilelD LEN = LEN(fTruit ) 
PRINT " N ANE amount 『 

PRINT 

DO 


GET FruitFilelD, LOC(FruitFileiD) + 1, frwuit 
1F EROF(FruitFilelD) THEN 
KNITT DO 


kND) IF 

PRINT fruit.itNamei "ニー リュ USING ます ## ま きり Truit.amount 
LO00P 
CLOSE FruitFilelD 
END 





g90 


圏 ノー ト 
オー プン し た ファ イル の 形態 に よっ て 、 フ ァイル 内 の 位置 は 異な る の で 注意 
し て 使わ な けれ ば な ら な い 。 








ファ イル の タイ プ 位置 


オー プン 後 最後 に アク セス し た バイ ト 位 置 / 
128 を 返す 。 
オー プン 後 最後 に アク セス し た レコ ー ド 番号 
を 返す 。 オー プン 直後 は 0 を 返す 。 


オー プン 後 最後 に アク セス し た バイ ト 位 置 を 
返す 。 オー プン 直後 は 0 を 返す 。 







シー ケン シャ ル 










ラン ダム アク セス 












バイ ナリ ー 






ぁ 参照 ステ チー トメント.・OPEN、 INPUT#、GET# 
ぁ 参照 関数 : LOF() 、SEEK () 


10rejl 
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LOF0 


ファ イル の バイ ト ・ サ イズ 





田 機 能 
オー プン し て ある ファ イル の バイ ト ・ サ イズ を 知る 


一 書式 





LOF( フ ァイル 番号 ) 





田 引 数 と 戻り 値 
引 数 ファ イル 番号 … 知 り た い フ ァイル の オー プン 時 の ファ イル 番号 を 渡 
す 


戻り 値 | ファ イル の サイ ズ を バイ トト 数 で 返す 。 










画 文 例 


TYPE FoodRecType 
itName AS STRING * 10 
amount AS INTEGER 
END TYPE 

DIM fruit AS FoodRecType 


OPEN "Fruit,.Dat" FOR RANDOM AS 1 LEN = LEN(fruit) 
recMax = LOF(1) / LEN(fruit) 


enterPrompt$ = "Rec. No (1 -" + STR$(recMax) + 0 





田 ノ ー ト 
p 参照 ステ チー トメント : OPEN、SEEK 


dg 


LOG( 


自然 対数 の 計算 





画 機 能 
e を 底 と し た と き の n の 対数 (自然 対数 ) を 求め る 
還 書 式 





LOG( 数 値 式 ) 





田 引 数 と 戻り 値 
引 数 n… 自 然 対数 を も と め る と き の n を 渡す 
n の 自然 対数 を 返す 。 


n = 2 
PRINT LOG(n ) 





く 実 行 結果 > 


076 


・6931472 


田 ノ ー ト 
ぁ 参照 関数 : EXP() 
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LPOS0 


プリ ンタ ー・ ヘ ッ ド の 現在 行 





画 機 能 
プリ ンタ ー・ バ ッ フ ァ 内 の プリ ンタ ー・ ヘ ッ ド の 現在 行 を 知る 
画 書 式 





LPOS( 番 号 ) 





較 引 数 と 戻り 値 
… プリ ンタ ー の デバ イス 番号 (LPT1: な ら ば 1 ) を 渡す 





戻り 値 | プリ ンタ ー・ ヘ ッ ド が ある 現在 の 行 を 返す 。 


較 文 例 


PRTNT LPOS(1 ) 


く 実 行 結果 > 





g94 


LTRIMS() 











先頭 空白 文字 の 除去 
還 機 能 
文字 列 の 先頭 に ある 空白 文字 を 取り 除く 
還 書 式 
LTRIMS$( 文 字 式 ) 
固 引 数 戻り 値 











引 数 文字 式 … 先 頭 に ある 空白 文字 を 取り 除き た い 文 字 列 を 渡す 
戻り 値 | 先頭 に ある 半角 お よび 全角 の 空白 文字 を 取り 除い た 文字 列 を 返す 。 





較 文 例 


StringExpresSsion$ = " QuickBASIC 4.2" 
StringReturn$ = LTRIM$( StringExpression$ ) 

PRINT stringExpression$, LEN( stringExpression$ ) 
PRINT stringReturn$, LEN( stringReturn$ ) 





< 実行 結果 > 


QuickBASIC 4.2 


QuickBASIC 4.2 





圏 ノー ト 
ぁ 参照 関数 : RTRIMS() 
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Pe 
| 
婦 
E] 
る 





MID$( 


部 分 文字 列 の 抽出 





画 機 能 
文字 列 の 中 の 部 分 文字 列 を 取り 出す 
田 書 式 





MID$( 文 字 式 , 開始 位置 [, 文字 数 ]) 





圏 引数 と 戻り 値 


引 数 文字 式 … 元 に な る 文字 列 を 渡す 
開始 位置 … 取 り 出 す 部 分 文字 列 が 文字 式 の 中 で 始ま る 位置 を 文字 式 
の 先頭 か ら 半角 ( 1 バイ ト ) 単位 で 数 えて 数 値 で 渡す 
… 取 り 出 す 文 字数 を 文字 式 の 先頭 か ら 半角 (1 バイト) 単位 


で 数 えて 数 値 で 渡す 


引数 の 文字 式 の 中 の 開始 位置 より 文字 数 だ け 取り 出し て 文字 列 で 返 
す 。 





画 文 例 


1anguage$ = MID$("QuickBASIC4.2"。 6」 5) 


PRINT 1anguage$ 





< 実 行 結果 > 





BASTIC 


gd6 


田 ノ ー ト 

引数 で ある 開始 位置 は , 1-32767 の 範囲 の 数 値 で な けれ ば な ら な い 。 
引数 で ある 文字 数 は 、 省 略 可 能 で ある が 指定 する と き は 0 一 327671 の 範囲 の 数 
値 で な けれ ば な ら な い 。 

p その 開始 位置 お よび 文字 数 が 実数 な ら ば 、 小 数 第 1 位 で 四捨五入 され る 。 


その 開始 位置 が 文字 式 の 長き を 超え みて いる か 、 ま た は その 文字 数 が 0 な ら ば 、 


ヌル が 返さ れる 。 

引数 で ある 文字 数 を 省略 する か 、 ま た は その 文字 数 が 開始 位置 か ら 未 尾 ま で 
文字 数 を 超え て いる な ら ば 、 開 始 位置 か ら 末尾 まで の 文字 列 が 返さ れる 。 

ぁ 参照 関数 : LEFT$、RIGHT$、INSTR 


MKI$0 /MKL$ 0 /MKS$0) /MKD$( 


文字 列 へ の 変換 





男 機 能 
整数 型 の 数 値 を 2 バイ ト 文 字 列 に 変換 する 
長 整数 型 の 数 値 を 4 バイ ト 文 字 列 に 変換 する 
単 精度 型 の 数 値 を 4 バイ ト 文 字 列 に 変換 する 
倍 精度 型 の 数 値 を 8 バイト 文字 列 に 変換 する 
較 書 式 





MKIS( 整 数 型 数 値 式 ) 

MKLS( 長 整数 型 数 値 式 ) 
MKS$( 単 精度 型 数 値 式 ) 
MKD$( 倍 精度 型 数 値 式 ) 
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上 コ ゴ 
円 
に 4 
天 
レー 
に 
邊 
と 
の 
9 
ミ 
天 
ロ 
め 





較 引 数 と 戻り 値 


引 数 変換 し た い 型 に あっ た 関数 に それ ぞ れ の 引数 を 渡す 
整数 型 数 値 式 … 変 換 し た い 整 数 の 式 を 渡す 
長 整数 型 数 値 式 … 変 換 し た い 長 整数 の 式 を 渡す 


単 精度 型 数 値 式 … 変 換 し た い 単 精度 の 式 を 渡す 
倍 精度 型 数 値 式 … 変 換 し た い 倍 精度 の 式 を 渡す 


戻り 値 | 変換 され た 文字 列 が 各 バ イト 数 で 返さ れる 。 





一文 例 


FITELD #1, 2 AS numF1d$ 
num = 28 
RSET numF1d$ = MKT$(num) 


FIELD #]1, 4 AS numF1d$ 
num = 12345 
RSET numF1d$ = MKL$(num) 


FITELD #1, 4 AS numF1d$ 
num = 721600 
RSET numF1d$ = MKS$(num) 


)$1IW/()SDW 


FTIELD #], 8 AS numF1d$ 
num = 12345000 
RSET numF1d$ = MKD$(num ) 





E コ 
大 
の 】 
の 
E コ 
に 
ワ 
の 


田 ノ ー ト 
p 参照 関数 : CVI() /CVL() /CVS0/CVD() 





9B 


MKSMBF$() /MKDMBFS() 


MBF フォ ー マ ッ ト 文 字 列 へ の 変換 





画 機 能 

単 精度 型 の IEEE フォ ー マ ッ ト の 数 値 を マイ クロ ソフ ト ・ バ イナ リー・ フ ォ ー 
マッ ト (MBF) の 4 バイ ト 文 字 列 に 変換 する 。 

倍 精度 型 の IEEE フォ ー マ ッ ト の 数 値 を マイ クロ ソフ ト ・ バ イナ リー・ フ ォ ー 
マッ ト (MBF) の 8 バイ ト 文 字 に 変換 する 。 
画 書 式 





MKSMBFS( 単 精度 型 数 値 式 ) 
MKDMBF$( 倍 精度 型 数 値 式 ) 





固 引 数 と 戻り 値 


引 数 単 精度 型 数 値 式 …MBF4 バ イト 文字 に 変換 し た い 単 精度 型 IEEE フ 
ォ ー マ ッ ト の 数 値 式 を MKSMBF$ 関 数 に 渡す 

…MBF8 バ イト 文字 に 変換 し た い 倍 精度 型 IEEE フ 
ォ ー マ ッ ト の 数 値 式 を MKDMBF$ 関 数 に 渡す 。 


戻り 値 | 4 バイト また は 8 バイ ト の MBF 文字 列 を 返す 。 


介 ド で に | に か | | 


E ゴ 
大 
ご 
ゴ 
要 
や 
に 
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画 文 例 





較 ノ ー ト 
y「IEEE フォ ー マ ッ ト 」 お よび 「 マ イク ロ ソ フト ・ バ パイ ナリ ー・ フ ォ ー マ ッ ト 
(MBF)」 に つい て は 、CVSMBF 関数 /CVDMBF 関数 を 参照 し て くだ さい 。 





OCT$0 











8 進 表現 文字 列 へ の 変換 
画 機 能 
数 値 を 8 進 表 現 の 文字 列 に 変換 する 
画 書 式 
OCTS( 数 値 式 ) 
田 引 数 と 戻り 値 


引 数 数 値 式 …8 進 表現 の 文字 列 に し た い 数 値 を 渡す 。 


戻り 値 | 8 進 表現 の 文字 列 に し て 返す 。 





画 文 例 


numericExpression = 255 
stringReturn$ = OCT$(numericExpression ) 


PRINT stringReturn$, numericExpression 


く 実行 結果 > 





377 255 


圏 ノー ト 
引数 が 実数 な ら ば 、 小 数 第 1 位 を 四捨五入 し て か ら 文 字 列 に 変換 する 。 
戻り 値 の 文字 列 に は 、 先 頭 に &O は 付か な い 。 
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PEEK() 


メモ リー・ ア ドレ ス の スト ア 内 容 





画 機能 
特定 の メモ リー・ ア ドレ ス に スト ア さ れ て いる 内 容 を 知る 
田 書 式 





PEEK( ア ドレ ス ) 





一 引数 と 戻り 値 
引 数 アド レス … 読 み 込み た い ア ドレ ス の オフ セッ ト を 渡す 


戻り 値 | 現在 の セグ メン ト か ら の オフ セッ ト ・ ア ドレ ス に ある 内 容 を ASCII 





還 文 例 


1anguage$ = "QuickBASIC" 
間 約 0 
DO 


PRINT CHR$(PEEK(SADD(1anguage$ ) + cnt) ) : 
し っ 1 k っ 上 - 講 6c) ru 1 
LOOP WHILE (cnt < LEN(1anguage$ ) ) 


く 実行 結果 > 





QuickBASTC 


圏 ノー ト 
ぁ 参照 ステ ー ト メン ト : DEF SEG 
ぁ 参照 関数 : POKE() 


30g 


PMAP() 
物理 座標 論理 座標 





画 機 能 
論理 座標 に 対応 する 物理 座標 、 も し く は 物理 座標 に 対応 する 論理 座標 に 変換 
する 。 
画 書 式 





PMAP( 座 標 , 変換 方 法 ) 





較 引 数 と 戻り 値 


引 数 | 座標 … 変 換 し た い 座標 を 渡す 。 
変換 方 法 … ど の よう に 変換 する の か 指示 する た め に 次 の 番号 を 渡す 。 


番号 変換 の 仕方 
| 0 | 論理 座標 を 物理 * に 変換 する 
| 1 | 有理 座標 を 物理 座標 y に 変換 する 
| 2 | 物理 座標 を 論理 訟 標 x に 変換 する 
| 3 | 物理 座標 を 論理 座標 y に 変換 する 
戻り 値 | 引数 の 座標 を 変換 し た 別 の 座標 を 返す 。 


田 文 例 


WINDOwW (1, 1 )-(640, 400) 

x1 = 100: y1 = 10D: x2 = 200: y2 = 200 
LINE (x1, y1)-(x2, y2) 

al = PMAP(x1, 0) 

b1 = PMAP(y1, 1) 

a2 = PNAP(x2, 2) 

b2 = PHAP(y2, 3) 





LINE (a1, b1)-(a2, b2) 





圏 ノー ト 
Py 参照 ステ ー ト メン ト : WINDOW 


第 4 章 @ 関 数 一 一 303 


POINTO 


ピク セル の カラ ー 番 号 / 座 標 





田 機 能 
任意 の ピク セル の カラ ー 番 号 、 現 在 の グラ フィ ッ ク ・ カ ー ソ ル の 座標 を 知る 
画 書式 





POINT({ x 座標 , y 座標 | 座標 指定 }) 





圏 引数 と 戻り 値 


x 座標 、 y 座標 … カ ラー を 知り た い 座 標 を 渡す 。 
座標 指定 … ど の 座標 を 知り た いか を 番号 で 渡す 。 









戻り 値 | 座標 を 渡し た と き は その カラ ー 属 性 コー ド を 、 ま た 座標 指定 を 渡し 
た と き は 現在 の 座標 を 返す 。 


較 文 例 


WTNDOW (-100, -100)-(540, 300) 
xls 503. yl = 50: ix の = は 00: Y2 = 250 
LINE (x1。 y1)-(x2。 y2) 


PRINT POINT(0): POINT(1 ) : POINT( 2 ) : POINT(3) 
PRTNT POINT( POINT( 2 ) , POINT(3) ) 





く 実行 結果 > 


200 50 100 250 
7 


田 ノ ー ト 
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POS0 


カー ソル の 桁 位置 





画 機能 
カー ソル が 現在 ある 桁 位置 を 知る 
較 書 式 





POS( ダ ミー) 





田 引 数 と 戻り 値 









引 数 ダミ ー… 意 味 の な い 数 値 を 引数 と し て 渡す 
戻り 値 | 現在 の カー ソル の 桁 位置 を 整数 で 返す 





較 文 例 


LOCATE 7, 2: PRTNT "QuickBASIC" : 
numericReturn% = POS(0 ) 


PRTNT : PRINT numericReturn% 





< 実行 結果 > 


10 に (9 に 


圏 ノー ト 

ダミ ー の 数 値 は 、-32768-32767 の 範囲 の 数 値 で な けれ ば な ら な い 。 
カー ソル の 桁 位置 は 、 1 て 80 の 整数 で 返さ れる 。 

カー ソル の 行 位置 を 知る に は 、CSRLIN 関数 を 使う 。 
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RIGHT$( 


文字 列 の 右端 部 分 の 抽出 





画 機 能 
文字 列 の 右端 部 分 を 取り 出す 
画 書 式 





RIGHT$( 文 字 式 , 文字 数 ) 





圏 引数 と 戻り 値 


引 数 文字 式 … 未 尾 に ある 取り 除き た い 空 白 文字 列 を 渡す 
文字 数 … 取 り 出 す 文 字数 を 文字 式 の 先頭 か ら 半角 (1 バイ ト ) 単 位 て 


数 えて 数 値 で 渡す 。 
引数 の 文字 式 の 末尾 か ら 文字 数 だ け 取 り 出 し て 文字 列 で 返す 。 





圏 文例 


versionNo$ = RIGHT$( "QuickBASTC4.2"。 3) 


PRINT versionNo$ 





< 実行 結果 > 


画 ノ ー ト 

引数 で ある 文字 数 は 、0~32767 の 範囲 の 数 値 で な けれ ば な ら な い 

y その 文字 数 が 実数 な ら ば 、 小 数 第 1 位 で 四 捨 五 人 され る 。 

y その 文字 数 が 0 な ら ば 、 ヌ ル が 返さ れる 。 

その 文字 数 が 文字 式 の 長 さ を 超え る な ら ば 、 文 字 式 と 同じ 文字 列 が 返さ れる 。 
ぁ 参照 関数 : LEFT$、MID$、INSTR 
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RND() 


乱数 の 発生 





還 機 能 
0 から 1 の 間 の 乱数 を 発生 さき せる 
還 書 式 





RND [(n)] 





固 引 数 こ 戻 り 値 
引 数 | n… 乱 数 の 発生 の 仕方 を 数 字 で 渡す 。 
n だ コク jp 
| 正 | 乱数 系 列 を ペー ス 発 生 させ る 。 
| 0 | 前 の 発生 し た 乱数 を 返す 。 
| 負 | 一 定 の 値 を 発生 させ る 。 
戻り 値 | 0 一 1 の 単 精度 型 数 値 を 返 す 。 























607s い | 


= 100: x2 = 400: y2 = 300 
* 1 ) sd 
LiNE (x1。 y!)-(x2。 y2)。 、 BF 
FOR n = 1 TO 10000 
h = INT((x2 - xi + 1) * RND + x1) 
Y = INT((y2 - y1 + 1) * RND + y1) 
clr = INT(RND * き 7) + 1 
IF h < x】 OR h > x2 THEN 
LOCATE 1。 1: PRINT h 
END IF 
PSET (h。 ヾ ),。 clr 
NEN7_n 





田 ノ ー ト 

kn を 省略 する と 正 数 が 渡さ れ た の と 同じ に な る 。 

 RND() は 、RANDOMIZE で 指定 し た シー ド (乱数 系 列 ) を も と に 発生 され る 。 
ぁ 参照 ステ ー ト メン ト : RANDOMIZE 


第 4 章 @ 関 数 一 一 307 


RTRIMS() 


文字 列 の 未 尾 空白 文字 の 除去 





画 機 能 
文字 列 の 末尾 に ある 空白 文字 を 取り 除く 
画 書 式 





RTRIM$( 文 字 式 ) 





画 引 数 と 戻り 値 
引 数 文字 式 … 未 尾 に ある 取り 除き た い 空 白 文 字 列 を 渡す 
戻り 値 | 末尾 に ある 半角 と 全角 の 空白 文字 を 取り 除い た 文字 列 を 返す 。 









弄 文 例 


stringExpression$ = "QuickBASIC 4.2 0 
StringReturn$ = RTRIM$( stringExpreSSsion$ ) 
PRINT stringExpreSSion$。 LEN( stringExpresSion$ ) 
PRINT stringReturn$, LEN( stringReturn$ ) 





< 実行 結果 > 


QuickBASIC 4.2 


QuickBASIC 4.2 





較 ノ ー ト 
p 参照 関数 : LTRIM$() 
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SADD0 


文字 列 の 先頭 アド レス 





画 機 能 
文字 列 の 先頭 アド レス (オフ セッ ト 値 ) を 知る 
画 書 式 





SADD( 文字 列 変数 名 ) 





固 引 数 と 戻り 値 







引 数 文字 列 変数 名 … 文 字 列 型 の 変数 名 また は 配列 要素 を 渡す 
戻り 値 | その と き 現 在 の セグ メン ト ・ ア ドレ ス か ら の オフ セッ ト を 整数 で 返 





弄 文 例 


1anguage$ = "QuickBASTC" 
cnt = 0 
DO 


PRTNT CHR$(PEEK(SADD(1anguage$ ) + cnt) ) : 
(りり 0 に - 此 いう (5 中 
LOOP WHILE (cnt < LEN(1anguage$ ) ) 


く 実 行 結果 > 


QuickBASTC 





田 ノ ー ト 

引数 と し て 固定 長文 字 列 変数 名 を 渡す こと は で き な い 。 

p SADD 関数 は 、VARPTR 関数 を 使っ て 表わす こと が で きる 。 
PEEK(VARPTR(varName$) 十 3) * 包 H100 
PEEK(VARPTR(varName$) 十 2) 

ぁ 参照 関数 : VARSEG() 、VARPTR () 、VARPTRS$ () 
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SCREEN0) 


表示 文字 の AGCII コー ド と カラ ーー 属性 (Ver.4.5 拡張 ) 





画 機 能 

テキ スト ・ ス クリ ー ン に 表示 され て いる 文字 の ASCII コー ド お よび カラ ー 属 
性 を 知る 
画 書 式 





SCREEN( 行 , 桁 [, カラ ー フ ラグ ]) 





田 引 数 と 戻り 値 


行 , 桁 … 知 り た い 文 字 の テキ スト ・ ス クリ ー ン 座標 を 渡す 
カラ ー フ ラグ … カ ラー・ コ ー ド を 知る に は 0 以外 の 数 値 を 渡す 。 


指定 し た 座標 に 表示 され て いる 文字 の ASCII コー ド ま た は カラ ー・ 
0 人 ド を 返す 。 





画 文 例 


CL 

COLOR 11 

LOCATE 12, 20 

PRINT "クイ ッ ク ペ ベー シック" 

COLOR 3 

FOR c = 20 TO 38 STEP 2 
CH1$ = CIIR$(SCREEN(12, c)) 
CH2$ = CHR$(ABS(SCREEN(12,。c +* 1))) 
LOCATE 11。 ci: PRINT CHI き 
LOCATE 13、 c: PRINT CH2$ 

NEXT ce 


く 実 行 結果 > 


の 
の 
トリ 
ul 
ul 
ヒコ 





クイ ッ ク ペ ベーシック 


クイ ッ ク ペ ー シ ッ ク 
クイ ッ ク ペ ベー シッ ク 





圏 ノー ト 
y 2 バイ ト 文 字 の と き 、 1 バイ ト 目 な ら ば 正 数 の 漢字 連続 コー ド が 返さ れ 、 2 
バイ ト 目 な ら ば 負数 の 漢字 連続 コー ド が 返さ れる 。 
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SEEK0) 


ファ イル 内 の 次 の 位置 





画 機 能 
ファ イル 上 の 次 に アク セス する 位置 を 知る 


男 書 式 





SEEK( フ ァイル 番号 ) 





較 引 数 こ 戻 り 値 


引 数 ファ イル 番号 … 知 り た い フ ァイル の オー プン 時 の ファ イル 番号 を 渡 


戻り 値 | ファ イル 上 の 次 の 位置 を 数 値 で 返す 。 





較 文 例 


TYPE FoodRecType 
itName AS STRING * 10 
amount AS TNTEGER 
END TYPE 
DIM fruit AS FoodRecType 
FruitFileID = FREEFILE 
OPEN "Fruit.Dat" FOR RANDOM AS FruitFilelD LEN = LEN(fruit ) 
PRINT " N AME amount 『" 


GET FruitEFileTD, SEEK(FruitFile1D ) 。 fruit 
IF EOF(FruitFileID) THEN 
EXIT DO 

END IF 

PRINT fruit.itNamei " = ": USTNG ##」## せ 「: fruit.amount 
LOOP 
CLOSE FruitFilerD 
END 
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10 じ ヒヒ に 1 





國 ノ ー ト 
オー プン し た ファ イル の 形態 に よっ て 、 フ ァイル 内 の 次 の 位置 異な る の で 
注意 し て 使わ な けれ ば な ら な い 。 









ファ イル の タイ プ 位置 


オー プン 後 最後 に アク セス し た バイ ト 位 置 二 
1 を 返す 。 
オー プン 後 最後 に アク セス し た レコ ー ド 番 
号 十 1 を 返す 。 オー プン 直後 は 1 を 返す 。 


オー プン 後 最後 に アク セス し た バイ ト 位 置 + 
1 を 返す 。 オー プン 直後 は 1 を 返す 。 








シー ケン シャ ル 






ラン ダム アク セス 








バイ ナリ ー 





ぁ 参照 ステ ー ト メン ト : OPEN、INPUT #、GET# 
ぁ p 参照 関数 : LOF() 、 LOC() 
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SETMEM0() 


far ヒー プ の メモ リー・ サ イズ の 変更 





田 機 能 

far ヒー プ に よっ て 使わ れる メモ リー・ サ イズ を その と き の サ イズ か ら 相 対 
的 に 大 きく し た り 小 さく で きる 
画 書 式 





SETMEM( バ イト 数 ) 





較 引 数 と 戻り 値 
引 数 バイ ト 数 … 増 加 し た いと き は 正 数 を 、 減 少し た いと き は 負数 を 渡す 


戻り 値 | 増減 し て で きた サイ ズ を 返す 。 





田 文 例 


PRINT HEX$( SETMEM( 0 ) ) 


PRINT HEX$(SETMEM( -&H1000 ) ) 





< 実行 結果 > 


の) 
m 
ゴ 
上 
計 


243CO0 
233CO 





圏 ノー ト 
バイ ト 数 が 0 の と き は 、 増 減 0 な の で その と き の サ イズ を 知る こと が で きる 。 
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0 いら に 


SGN0) 


数 値 の 符号 





軒 機 能 
数 値 の 符号 を 知る 
田 書 式 





SGN( 数 値 式 ) 





一 引数 と 戻り 値 








引 数 数 値 式 … 符 号 を 知り た い 数 値 式 を 渡す 
戻り 値 | 負 ・ ゼ ロ ・ 正 を 表わす 数 を それ ぞ れ -1、 0 、 1 を 返す 。 






還 文 例 


num = -127 
SELECT CASE SGN(num) 
CASE 1 

sign$ = "Plus" 
CASE -1 


sign$ = "Minus" 
CASE ELSE 

sign$ = "Zero" 
END SELECT 
PRINT sign$ 





< 実 行 結果 > 


MinuS 
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SIN( 


正 苔 の 計算 





画 機能 
正弦 (サイ ン ) を 求め る 
男 書 式 





SIN( 数 値 式 ) 





較 引 数 と 戻り 値 
引 数 数 値 式 … ラ ジア ン を 渡す 


ラジ アン の 正弦 を 返す 。 





田 文 例 


CONST PIT = 3.14593 
angle = 45 


PRINT SIN(angle * PI / 180) 


< く 実行 結果 > 





0 に 


・7078731 


田 ノ ー ト 
ぁ 参照 関数 : COS() 、TAN() 
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SPACES() 


空白 文字 列 





軒 機 能 
半角 の 空白 文字 列 を 作る 
画 書 式 





SPACE$( 長 さ ) 





圏 引数 と 戻り 値 
引 数 長 さ … 作 り た い 空 白 文 字 列 の 長 さ を 渡す 


戻り 値 | 指定 し た 長 さ の 空白 文字 列 が 返さ れる 。 





画 文 例 


ymd$ = "1989" + SPACE$(3) + "06" + SPACE$(3) + “15 


PRINT ymd$ 





< 実行 結果 > 


の 
で 
ア 
る 】 
rm 
9) 


1989 06 15 


一 ノー ト 
p 長 さ は 、0-32767 ま で 指定 で きる 。 
p 長 さ が 0 の と き は ヌル が 返さ れる 。 
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SPC( 


スキ ッ プ 





機 能 
PRINT お よび LPRINT ス テー トメ ント に お いて 、 表 示 デ ー タ また は 印字 デ 


ー タ の 間 の 間隔 を 空け る 。 
田 書 式 





SPC( 文 字数 ) 





較 引 数 と 戻り 値 
引 数 文字 数 … 空 けた い 間隔 文字 数 を 渡す 





田 文 例 


PRINHT "Quick"i SPC(0)j "BASTCY ji SPC(1)j "4.2" 





< 実行 結果 > 


9p だ に 


QiickBASIC 4.2 





田 ノ ー ト 

コマ ンド の 関数 は 、PRINT また は LPRINT ステ ー ト メン ト の 中 で し か 使え 
な い 。 式 の 中 で は 使え な い 。 

P 文字 数 は 、032767 ま で 指定 で きる 。 

ぁ 文字 数 が 0 の と き の 間 隔 は 空 か な い 。 

ぁ 参照 関数 : SPACE$ () 、 TAB() 
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SQR0) 


平方 根 の 計算 





画 機能 
平方 根 を 求め る 
一 書 式 





SQR( 数 値 式 ) 





較 引 数 と 戻り 値 
引 数 数 値 式 … 平 方 根 を 求め た い 値 ま た は 数 値 式 を 渡す 。 





戻り 値 | 数 値 式 の 平方 根 を 返す 。 


還 文 例 


org = 64 


PRINT SQR(org ) 





< 実行 結果 > 


較 ノ ー ト 
P 数 値 式 は 、 0 以上 で な けれ ば な ら な い 。 





318 


STRS() 


文字 列 へ の 変換 





男 機 能 
数 値 を 文字 列 に 変換 する 
男 書 式 





STRS( 数 値 式 ) 





画 引 数 と 戻り 値 
引 数 数 値 式 … 文 字 列 に 変え た 数 字 を 渡す 


戻り 値 | 文字 列 を 返す 。 





一 文例 


year = 1989: month = 6: day = 18 
today$ = STRS(year) + " 年 " + STRS(month) + " 月 " + STR$(day) + " 日 " 


PRINT today$ 





< 実行 結果 > 


1989 年 6 月 18 日 


圏 ノー ト 

返さ れる 文字 の 先頭 は 、 符 号 用 に な っ て いる 。 引数 が 負 な ら ば マイ ナス 記号 
が 付き 、 正 な ら ば 空白 文字 が 付く 。 

ぁ 参照 関数 : VAL() 
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STRING$() 


反復 文字 列 





画 機能 
任意 の 文字 か ら 成る 文字 列 を 作る 
画 書 式 





STRING$( 文 字数 , {コー ド | 文字 式 }) 





画 引 数 と 戻り 値 


引 数 文字 数 … 作 り た い 文 字 列 の 長 さ を 渡す 
コー ド …ASCII コー ド ( 0 一 255) ま た は 漢字 連続 コー ド 
(256-11535) を 数 値 で 渡す 


文字 式 … 反 復 の も と の 文字 を 渡す 


戻り 値 | コー ド に 対応 する 文字 また は 文字 式 の 先頭 文字 を 使っ て 文字 数 分 
だ け の 長 さ の 反復 文字 列 を 返す 。 





画 文 例 


の 
ー 
思 
テ 
6 
に 


PRINT STRING$(60, "-") 


< 実行 結果 > 





3e0 


圏 ノー ト 

P 文字 数 は 、 半 角 ・ 全 角 に 関係 な くど ちら も 1 文字 と し て 数 える 。 

 「 漢 字 連 続 コ ー ド 」 と は 、 シ フト JIS 漢字 コー ド 表 の 2 バイ ト 文 字 で ある 必 
H8140 以 降 を 、ASCII コー ド に 続く も の と し て 256-~-11535 ま で の コー ド を 連続 
的 に 付け た コー ド を いう 。 た と えば 、 つ ぎの よう に な っ て いる 。 


全角 連続 コー ト 





ぁ 文字 式 を 渡す と 、 半 角 ・ 全 角 に 関係 な く 先頭 の 1 文字 を 使っ て 反復 文字 を 作 
る 。 


の 
ゴ 
妥 
上 ゴ 
の 】 
と 
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TAB0 











タブ の 設定 
画 機能 
スク リー ン 表 示 お よび プリ ンタ ー 印 字 の 左端 か ら の タブ を 設定 する 
田 書 式 
TAB( 文字 数 ) 
圏 引 数 と 戻り 値 


引 数 文字 数 … 左 端 か ら 数 えた 位置 を 渡す 





画 文 例 


PRINT "Quick": TAB(7): "BASTC" ij TAB(14)j “4.2" 





< 実行 結果 > 


Quick BASTC 4.2 


田 ノ ー ト 

コマ ンド の 関数 は 、PRINT また は LPRINT ステ ー ト メン ト の 中 で し か 使え 
な い 。 式 の 中 で は 使え な い 。 

ぁ 参照 関数 : SPACE$() 、SPC() 





de 


TAN0 
正 接 の 計算 





画 機 能 
正 接 ( タ ンジ ェ ン ト ) を 求め る 
男 書 式 





TAN( 数 値 式 ) 





較 引 数 と 戻り 値 
引 数 数 値 式 … ラ ジア ン を 渡す 


戻り 値 | ラジ アン の 正 接 を 返す 。 





文 例 


CONST PI = 3.14593 


angle = 30 
PRINT TAN(angle * PT / 180) 





< 実行 結果 > 


0 い 、1 


・5783145 


較 ノ ー ト 
ぁ 参照 関数 : SIN()、COS0、ATN() 





第 4 章 @ 関 数 一 一 3g3 


ト と 1 






TIME$ 


現在 の 時 刻 





画 機 能 
MS-DOS 上 の 現在 の 時 刻 を 知る 
画 書式 





TIMES$ 





較 引 数 と 戻り 値 


戻り 値 | 現在 の 24 時 間 制 時 刻 を つぎ の 形式 の 文字 列 で 返す 。 
HH : MM : SS 





田 文 例 


PRINT TIME$, TIMER 


く 実行 結果 > 


20:55:56 75356 


較 ノ ー ト 
p MS-DOS の 時 刻 を 設定 する に は 、TIME$ ス テー トメ ント を 使う 。 
ぁ 参照 関数 : DATES$、TIMER 






dg4 


TIMER 











経過 秒 数 

還 科 能 

時 刻 を "00 : 00 : 00" か ら の 経過 秒 数 で 知る 
還 書 式 
TIMER 
還 引 数 と 戻り 値 

戻り 値 、 現在 の 時 刻 を 深夜 0 時 か ら の 秒 数 (数 字 ) を 返す 。 
還 文 例 






< 実行 結果 > 


0 お 5 お 6 75356 


圏 ノー ト 
P 午前 7 時 0 分 3 秒 ("07:00:037) は 、25230 を 返す 。 
ぁ 参照 関数 : TIME$、DATES$ 


に EIJI 
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UBOUND0 


添字 の 上 限 





画 機 能 
ある 配列 に お ける 添字 の 上 限 を 知る 
画 書 式 





UBOUND( 配 列 [, 次 元 ]) 





画 引 数 と 戻 り 値 
引 数 配列 名 … 上 限 を 知り た い 配 列 の 名 前 を 渡す 
次 元 


次 元 … 上 限 を 知り た い 配列 の 次 元 を 渡す 
戻り 値 | 指定 し た 配列 の 次 元 の 上 限 を 返す 。 





画 文 例 


DIM ]inear(50), sales(1980 TO 1999, 1 TO 12) 


PRINT UBOUND( 1inear): UBOUND(sales ): UBOUND(sales, 2) 





し = 
の 
回 < 実行 結果 > 
$ 
50 1999 12 
還 ノ ー ト 





Py 次 元 を 省略 する と 、 1 次 元 を 指定 し た こと に な る 。 
ぁ 参照 ステ ー ト メン ト : DIM 
ぁ 参照 関数 : LBOUND() 


dg6 


UCASES() 











大 文字 へ の 変換 
男 機 能 
文字 列 に お ける アル ファ ベッ ト の 小文字 部 分 を 大 文字 に 変換 する 
画 書 式 
UCASE$( 文 字 式 ) 
較 引 数 こと 戻り 値 


引 数 文字 式 … 大 文字 に 変換 し た い 小 文字 を 含む 文字 式 を 渡す 


小文字 の 部 分 を 大 文字 に し た 文字 列 を 返す 。 












田 文 例 

PRTNT UCASE$("QuickBas ic4.2") 

< 実行 結果 > いこ 
押 

QUICKB AS 1C4.2 に 

較 ノ ー ト 

アル ファ ベッ ト の 小文字 と し て 、 

半角 の a 一 2 

全角 の a--Z 


の どちら で も よい 。 
ぁ 参照 関数 : LCASES () 
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VAL( 


数 値 へ の 変換 





画 機 能 
文字 列 を 数 値 に 変換 する 
画 書 式 





VAL( 文 字 式 ) 





較 引 数 と 戻り 値 
引 数 文字 式 … 数 値 に し た い 文字 列 を 渡す 


文字 列 形式 に な っ て いる 数 字 を 10 進 数 に し て 返す 。 





画 文 例 


PRTNT JIS$("、" ) , CHR$(257 ) , CHR$(VAL("&J2122" ) ) 


< 実行 結果 > 





2122 





3g8 


田 ノ ー ト 
Py 数 字 に 変換 で き な い と き は 、 0 を 返す 。 
引数 の 先頭 に 接頭 記号 が ある つぎ の タイ プ と し て 判断 する 。 





接頭 記号 2 
16 進 数 文字 









JIS コー ド ( 漢 字 連 続 コ ー ド を 返す ) 
句点 コー ド (漢字 連続 コー ド を 返す ) 
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8 に に し 


に 
っ 
コ 3 
で 
ゴ 
コ 
に 





VARPTR() /VARPTRS() 


セグ メン ト 内 で の 変数 の オフ セッ ト ・ ア ドレ ス 





画 機 能 
現在 の セグ メン ト 内 で の 変数 の オフ セッ ト ・ ア ドレ ス を 知る 。 
較 書 式 





VARPTR( 変 数 名 ) 
VARPTRS( 変 数 名 ) 





田 引 数 と 戻り 値 






引 数 変数 名 … オ フ セ ッ ト ・ ア ドレ ス を 知り た い 変 数 の 名 前 を 渡す 


引数 と し て 渡し た 変数 の オフ セッ ト ・ ア ドレ ス を 整数 また は 文字 列 
で 返す 。 






男 文 例 


FOR r = 0O TO 360 STEP 30 
DRAW "TA=" + VARPTR$(r) + "BM300,200 R100 D100 L100 U100" 


NEXT 





30 


田 ノ ー ト 
Py VARPTR() は 整数 で 返し 、VARPTRS$ () は 文字 列 で 返す 。 
P 文字 列 変数 の オフ セッ ト ・ ア ドレ ス は 、 そ の 文字 列 デ ー タ の アド レス で は な 
く て 、4 バ イト の "文字 列記 述 子 "の 先頭 アド レス で ある 。 
文字 列記 述 子 は 、 最 初 の 2 バイ ト は その 文字 列 の 長 さ を 管理 し 、 残 り 2 バイ 
ト は 、 文字 列 デー タ が 記憶 きれ て いる 実際 の アド レス を 管理 し て いる 。 
最初 の 2 バイ ト の 内 容 を 返す の が LEN 関数 で あり 、 残 り 2 バイ ト の 内 容 を 
返す の が SADD 関数 で ある 。 


VARPTR( か SADD() 






アド レス ii i け 1 i 十 2 3 


6。 上 1 半 2 


|*ー 5 バイ ト ーー*| 


ぁ p 参照 ステ ー ト メン ト : DEF SEG、DRAW 
p 参照 関数 : VARPTR() 、VARPTR$() 、SADD( 


に 
と 
トリ 
で 
ゴ 
ピッ 
ト 
コ 
つ 
や 
に | 
F リ 
[の 
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VARSEG 


変数 の セグ メン ト ・ ア ドレ ス 





軒 機 能 
変数 の セグ メン ト ・ ア ドレ ス を 知る 
画 書 式 





VARSEG( 変数 名 ) 





画 引 数 と 戻り 値 












引 数 変数 名 … セ グ メ ント を 知り た い 変 数 の 名 前 を 渡す 


引数 と し て 渡し た 変数 の セグ メン ト ・ ア ドレ ス を 整数 で 返す 。 





一 文例 


DTM CodeName$(1 TO 100) 

1anguage$ = “QuickBASTC" 

true = -1: false = NOT true 

PRTNT HEX$(VARSEG(CodeName$ ) ) , HEX$(VARPTR(CodeNames$ ) ) 
PRINT HEX$(VARSEG( 1anguage$ ) ) , HEX$(VARPTR(1anguage$ ) ) 
PRINT HEX$(VARSEG( true ) ) ,。 HEX$(VARPTR( true ) ) 





< 実行 結果 > 





圏 ノー ト 
p 参照 ステ ー ト メン ト :DEF SEG 
ぁ 参照 関数 : VARPTR() 、VARPTR$() 、SADD() 
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EC 
メタ ・ コ マン ド 


この 章 で は 、QuickBASIC が 標準 と し て 提供 し て いる 
メタ ・ コ マン ド の すべ て を アル ファ ベッ ト 順 に 説明 し ます 
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メタ ・ コ マン ド と は 、 プ ログ ラム の 実行 上 、 ソ ー ス ・ フ ァイル や 変数 
の 取り 扱い 方 に つい て Quick BASIC に 指示 する た め の 命 令 で す 。 全 部 
で 3 つの メタ ・ コ マン ド が あり ます 。 


Py SDYNAMIC 
p SINCLUDE : 
p $STATIC 


メタ ・ コ マン ド に 関し て 、 つ ぎの よう な 一 般 的 注意 事項 が あり ます 。 


⑱@ メ タ ・ コ マン ド の 名 前 は 、 必 ず "$" で 始ま ら な けれ ば な ら な い 。 

依 メ タ ・ コ マン ド は 、 ス テー トメ ント や 関数 と 異な り 、 注 釈 文 の 中 
に 書か な けれ ば な ら な い 。 

人 @ 1 つの 注釈 文 の 中 に 複数 の メタ ・ コ マン ド を 書く こと が で きる 。 
それ ら の メタ ・ コ マン ド の 間 に は 、 空 白 ま た は タブ を 入れ な けれ 
ば な ら な い 。 


この 章 の 読み 方 


この 章 で は 、 メ タ ・ コ マン ド を 以下 の スタ イル で 記述 し ます 。 


圏 メ タ ・ コ マン ド 名 
機能 に つい て の 要約 が 記述 され て いま す 。 


画 機能 
その メタ ・ コ マン ド の 働き や 用 途 に つい て の 要約 が 記述 され て いま す 。 
較 書 式 
メタ ・ コ マン ド に つい て の 完全 な 構文 (セン タッ クス) が 記述 され て い 
まず 。 
⑯ 書 式 中 の 記号 の 記述 と 意味 











大 英文 字 お よび | SDYNAMIC 


その まま 書く べき 箇所 









適当 な も の に 置き 換え イン クル ー ド ・ フ ァイル 
て 書く べき 箇所 


どれ か 1 つ を 選ぶ べき 箇所 






画 引 数 
引数 の 機能 や 意味 に つい て 記述 され て いま す 。 
圏 文例 
サン プル と し て る その 使用 例 を 掲げ て あり ます 。 
田 ノ ー ト 
補足 的 な 説明 や 使用 する と き の 注意 点 に つい て 記述 され て いま す 。 
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の 
章 
の 
読 
み 
方 











配列 の 記憶 領域 の プロ グラ ム 実 行 時 割り 当て 


画 機能 
プロ グラ ム の 実行 中 に 、 配 列 の た め の 記憶 領域 を その つど 割り 当て る 
画 書 式 


{REM | ′}  $DYNAMIC 


画 引 数 
な し 
画 文 例 





圏 ノー ト 
SDYNAMIC 指定 し な く て も 、 特 に 指示 し な いか ぎり 、 つ ぎの も の は この 種 
の 配列 に な る 。 
※ COMMON で 宣言 し た 配列 COMMON Year(1980 TO 1989) 
※ 添 字 が 変数 に な っ て いる 配列 max = 999 
DIM FileEntry(max) 
ぁ 参照 ステ チー トメント : ERASE 


$INCLUDE : 


イン クル ー ド ・ フ ァイル の 取り 込み 





・ ヨ QrTTONIS 


画 機能 

統合 環境 下 で プロ グラ ム を 実行 する と き 、 ま た は コン パイ ル す る と き に 別 の 
ファ イル と し て 存在 する イン クル ー ド ・ フ ァイル を ソー ス ・ フ ァイル の 一 部 と 
し て 、 指 定 箇所 に 取り 込む 
還 書 式 








{REM|′}) $INCLUDE: "イン クル ー ド ・ フ ァイル ' 





男 引 数 


イン クル ー ド ・ フ ァイル | 取り 込み た い イ ンク ルー ド ・ フ ァイル を 渡す 。 





田 文 例 


$INCLUDE: "BIN\QLB. BI" 





田 ノ ー ト 

pp インクルード ・ フ ァイル 名 は 、 拡 張子 まで 指定 し な けれ ば な ら な い 。 
イン クル ー ド ・ フ ァイル 名 は 、' で 囲ま な けれ ば な ら な い 。 

イン クル ー ド ・ フ ァイル 名 は 、 大 文字 で も 小文字 で も よい 。 

イン クル ー ド ・ フ ァイル に つい て は 、「Vol. 1 の 5・7 イン クル ー ド ・ フ ァ 
イル の 管理 と 編集 」 を 参照 し て くだ さい 。 
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め 
1 
トコ 
に 
@ 





$STATIC 


配列 の 記憶 領域 の コン パイ ル 時 割り 当て 





玉 機 能 
プロ グラ ム を コン パイ ル す る と き に 、 配 列 の た め の 記 憶 領域 を 割り 当て る 
田 書 式 





{REM|') $STATIC 





男 引 数 
な し 
較 文 例 


* sSTATIC 
max 三 999 


DIM FileEntry〈max) 





ノ ー ト 
$STATIC を 指定 し な く て も 、 特 に 指示 し な いか ぎり 、 つ ぎの も の は この 種 の 
配列 に な る 。 
※ 範 囲 指定 が 明確 な 配列 DIM Year(1980 TO 1989) 
※ 添 字 が 確定 し て いる 配列 DIM code(50) 
CONST max = 999 
DIM FileEntry(max) 
P 参照 ステ ー ト メン ト : ERASE 


338 


Ed 


72AtSieilE 還 は 

キー・ ス キャ ン ・ コ ー ド 

エラ ー メ ッ セ ー ジ 

@ 携 能 別 ス テー トメ ント ・ 関 数 索引 
Ver.4.5 て 追加 され た ステ ー ト メン ト お よび 関数 





ロロ 


rg つこ ) り 


付録 1 


ASOII コー ド 


Co ~-) の の の の どー 


0 
1 
@ 
3 
4 
5 
6 
7 
8 
9 
A 
B 
C 
D 
E 
F 


>J op Cm 忌 Cro 一 巳 ] " 








NSXx 華 そ と ゴゴ の ロ ゴロ (用 ミミ ビ スエ 6 田口 ロ 凶 @|ー っ ー† ト 1! 











NSK Kg ESTTIOO mn で IT 回 婦 ヨ ーー ズ と づ ゴ づ すす GFO gp 


付録 1 @ ASCII コー ドー 一 341 


テー ロ HI 11 つ SV 





ア 
0D 
9 
記 
| 
ド 





















中 ささ ー ト 3 へ 9 人 ト U「* 


> ツキ ロロ ママ せ は きせ ロロ 9 





34g 














Be 1 


NH 弓 、 や 上 HS< セ ニッ / | で ビラ キク SR に ドー 


トー 


St 


















付録 1 @⑯ ASOII コー ドーー343 


ン 
| 
9 
コ 
| 
ド 








『 録 2 


キー・ ス キャ ン ・ コ ー ド 
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この 表 の 見 方 

p 表 は 、 キ ー・ ス キャ ン ・ コ ー ド 順に な っ て いま す 。 

"キー" は 、 実 際 の キー ボー ド ・ ト ッ プ の こと で す 。 

"スキ ャ ン ・ コ ー ド "は 、KEY(m) ス テー トメ ント で 使う キー・ コ ー ド で 
表 。 

"ASCIT'" の 欄 は 、 そ の キー だ け を 押し た と き に 、INKEY$ () が 返す 値 
な 

P "SHIFT+" の 欄 は 、[SHIFT| キー を 押し な が ら そ れ ぞ れ の キー を 押し 
た と き に 、INKEY$() が 返す 値 で す 。 

P "CTRL+" の 欄 は 、[CTRL| キー を 押し な が ら そ れ ぞ れ の キー を 押し た 
と き に 、INKEY$ () が 返す 値 で す 。 

"カナ 十 " の 欄 は 、 カ ナ キ ー を 押し な が ら そ れ ぞ れ の キー を 押し た と き 
に 、INKEY$() が 返す 値 で す 。 

"SHIFT 二 カナ +" の 欄 は 、ISHIFT| キー と | カナ | キー を 押し な が ら そ 
れ ぞ れ の キー を 押し た と き に 、INKEY$() が 返す 値 で す 。 

y 表 の 中 の が 前 に 付い て いる 文字 は 、 制 御 コ ー ド 文字 で す 。 

p 表 の 中 の "00" が 前 に 付い て いる 10 進 数 お よび 16 進 数 は 、 第 1 バイ ト が 
ヌル で 第 2 バイ ト が その コー ド で す 。 
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隔 ト 人 20 語 19 時 記 : > | 62 ル |2I7|09| "| Ii|A 
/ ? メ 50132 |/ ? | 63 メ |2I0|1D2|・|l65| A5 

ロ 5| 133 95 311IF| ロ 2I9| DB 
く SPACE>| 52 134 32 32 | 20 
く XFER >| 53135 
<ROLLUP>| 54|136 008| 005| 
<ROLLDW>| 55 |37 0073 0049 
く NNS >| 56|38 0082 0052 
< く DEL >| 57139 0083 0053 
く 1 >| 5813A 0072 0048 
く で >| 59|3B 004B 
く っ >| 6013C 004D 
< よ ) み | 健 0 0050 
く CLR >| 62|5E 0047 
く HELP >| 63|13F 0079|004F 

- 64 | 40 45 | 2D 

/ 6514| 1/ 1471 2F/ 147|1 2 

7 66|42 17 |155! 3717 155| 37 

8 67|143 18 |156| 38|18 |156| 38 

9 68|44 19 |57| 39|9 |57| 39 

1 69145 |・ |42| 2l・ |142|1 

4 70146 |4 |52| 3414 |52| 34 

5 71147 15 153| 3515 153| 35 

6 72|148 16 |54| 36|6 |54| 36 

+ 73149 |+ 143| 2BH+ |143| 28 

| 74]4A | 1 |149| 3H1 149| 3 

2 75|4B 12 |50| 32|12 |50| 32 『 可 
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く NFER > 
く STOP > 
く COPY > 


f 


f 
f 
f 
f 
f 
f 
f 
f 
f 


co oo - コ の > <m ち 。 で っ ro 


IO 


く SHIFT > 
く CAPS > 
く カ ナッ > 
く GRPH > 
く CTRL > 


上 2 
上 3 
上 4 
上 5 
II6 





003B 
003C 
003D 
003E 
003F 
0040 
004| 
0042 
0043 
0044 


SHFT + 


0084 
0085 
0086 
0087 


0089 
0090 
009| 
0092 
0093 


二 > 明 = 燥 = 最 


0054 
0055 
0056 
0057 
0058 
0059 
005A 
005B 
005C 
005D 


CTRL + カナ 二 SHIFT + 


文字 10 進 |6 進 文 le 進 文字 10 進 |e 進 
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付録 3 


エラ ー・ メ ッ セ ー ジ 


対応 する FOR が あり ませ ん (ERR =1) 

構文 に 誤り が あり ます (ERR =2) 

対応 する GOSUB が あり ませ ん (ERR =3) 

READ で 読み 込む DATA が あり ませ ん (ERR =4) 
引数 が 許さ れる 範囲 で は あり ませ ん (ERR =5) 
計算 結果 が オー バー フロ ー し まし た (ERR =6) 
メモ リー が 足り ませ ん (ERR =7) 

ラベ ル が 定義 きれ て いま せん (ERR =8) 
配列 の 添字 が 許さ れる 範囲 に: ありま せん (ERR =9) 
宣言 の 重複 は 許さ れ ま せん (ERR =10) 

0 で 除算 し まし た (ERR =11) 

ダイ レク ト ・ モ ー ド で は 許さ きれ な い ス テー トメ ント で す (ERR =12) 
変数 , 式 の 型 が 一 致し ませ ん (ERR =13) 

文字 領域 が 足り ませ ん (ERR =14) 

文字 式 が 複雑 すぎ ま す (ERR =16) 

継続 で きま せん (ERR =17) 

FUNCTION が 定義 8 され て いま せん (ERR =18) 
RESUME が あり ませ ん (ERR =19) 

エラ ー 未 発生 で RESUME が 実行 され まし た (ERR =20) 
デバ イス か ら 応 答 が あり ませ ん (ERR =24) 

デバ イス が 上 異常 で す (ERR =25) 

対応 する NEXT が あり ませ ん (ERR =26) 

用 紙 が あり ませ ん (ERR =27) 

対応 する WEND が あり ませ ん (ERR =29) 


対応 する WHILE が あり ませ ん (ERR =30) 
ラベ ル が 重複 し て いま す (ERR =33) 
SUB が 定義 され て いま せん (ERR =35) 
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引数 の 数 が あい ませ ん (ERR =37) 

配列 が 宣言 され て いま せん (ERR =38) 

CASE ELSE が 必要 で す (ERR =39) 

引数 と し て 変数 が 必要 で す (ERR =40) 

指定 し た FIELD 長 を 超え て いま す (ERR =50) 

内 部 エラ ー が 発生 し まし た (ERR =51) 

ファ イル 名 ・ フ ァイル 番号 が 不適 当 で す (ERR =52) 
ファ イル が 見 つか り ま せん (ERR =53) 

ファ イル モー ド が 不適 当 で す (ERR =54) 

既に OPEN され て いま す (ERR =55) 

FIELD で 指定 され た 変数 は 利用 で きま せん (ERR =56) 
I/O デバ イス に 異常 が あり ます (ERR =57) 

既に ファ イル が 存在 し ます (ERR =58) 

レコ ー ド 長 が 不適 当 で す (ERR =59) 

ディ スク に 書き 込む スペ ー ス が あり ませ ん (ERR =61) 
ファ イル の 終わ り に 達し まし た (ERR =62) 

レコ ー ド 番号 が 不適 当 で す (ERR =63) 

ファ イル 名 が 不適 当 で す (ERR =64) 

ファ イル が 多 す ぎ ま す (ERR =67) 

デバ イス が 準備 され て いま せん (ERR =68) 
通信 用 バッ ファ が オー バー フロ ー し まし た (ERR =69) 
ファ イル ・ デ ィ ス ク が 書き 込み 禁止 で す (ERR =70) 
ディ スク が 準備 され て いま せん (ERR =71) 

ディ スク が 異常 で す (ERR =72) 

現在 サポ ー ト され て いま せん (ERR =73) 

ディ スク 間 で の 名 前 の 変更 は で きま せん (ERR =74) 
パス 名 が 不適 当 で す (ERR =75) 

パス 名 が 見 つか り ま せん (ERR =76) 

未定 義 の エラ ー が 発生 し まし た (ERR =??) 
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圏 ファ イル 
CHDIR-ーーーーーーーーー デ ィ レ クト リ の 変更 oe B9 
CLOSE 一 一 ーーーーーーー フ ァイル の クロ ー ズ …… ド etw… 73 
EDF (関数 ) ーーーーーーー ファ イル の 終わ り の テス ド COUUUCCEECPTYCCPTTTCTETYT p54 
F 民 ED 一 ーーー デ ーー ナー ラン ダム アク セス ・ ジ アイ ル ・ パ ッ ラ アァ の 四 義 …… ]05 
FILEATTH (関数 ) 一 一 - フ ァイル ・ NOTHOCTCYYCPPTPTTIPTYYTETTTFPPTTT B] 
FILE ーーーーーーーーーーー フ ァイル 名 の 表示 ………… RYOYDOTTP い YY 108 
FHEEFILE (関数 ) ーー 使用 可能 な ファ イル 番号 DECOCUCCCCCUPPOYTYYYTTYYPTPYPRTPTT PB5 
GET( フ ァイル ) 一 一 ラン ダム アク セス ・ フ ァイル / バ イナ リー・ 

ファ イル か ら の 読み 込み COTEECOLCCUOCECPLKYPIYTLCLLCIYYT ]]4 
INPUT ファ イル ) 一 一 - シーケンシャル ・ フ ァイル か ら の 読み 込み ……… 186 
INPUTS (関数 ) バイ ト 単 位 で の ファ イル 読み 込み …… の wi……… 70 
INPUT\ (関数 ) 文字 数 単位 で の ファ イル 読み 込み ……oiei…… 7e 
民 尼 上 ーーーーーー ナ ーー ーー 1 の 4 プ ド OCTINUUUULEECCTKTYYTKEYEYTLLCLTYYYYYYYT ]3g 
LINE INPUT# シー ケン シャ ル ・ フ ァイル か ら の 読み 込み ……… 139 
反 人 同国 (関数 ) ーーーーーー フ ァイル 上 の 現在 位置 ALULUUCYYYEYPTTPPTYTPPEYCPPTY で PPT pdH 
LOOK 一 一 ーーーーーーーー ファ イル ・ ア クセ ス の ロッ ク ………………………… 14g 
LODF (関数 ) geneHasrraeurs ン な 1 の リア AN 細く ロ サイ ズ DOCCUUTPCYYYTCPCTPTPYPYYTYYYFFT ggp 
MKDIH- 一 一 ーーーーー 一 一 新しい サブ ・ デ ィ レ クト リ の 作成 ………………… 148 
NAME ーーーーーーーーー フ ァイル 名 の 変更 / フ ァイル の 移動 ………………… 149 
DPEN( フ ァイル ) ファ イル の オー プン ECECCLCCCYYYYYYTCYYYPPPPPTYYTPTTYPYPTTPFT ]55 





350 


PUT( フ ァイル ) 一 ラン ダム アク セス ・ フ ァイル / バ イナ リー・ 








ファ イル へ の 書き 出し た 研 全 et 178B 
HESET 一 ーーーーー デ テー ファ イル の クロー イス eeoereeeenennnmnrnrw 187 
SEEK 一 ーーーーーーーー フ ァイル 上 の 位置 の 設定 …… ぐ oeieieieeeeie 198 
GEEK (関数 ) 一 ーーー- フ ァイル 内 の 次 の 位置 会 研 fierrrt… 引 ] 
UNLODOK ーーーーーーーー フ ァイル ・ ア クセ ス の アン ロッ ク …‥ ド eee 5 
WIDTHー ニ ーーーーーーーーー 出力 文字 数 の 設定 oo g99 
圏 スク リー ン 
CIHOLE - 一 ーーーーーー デ 円 、 頂 円 を 描く OCCULTYYYYYYYYYTTPITLCLO 70 
COL [人 0 | ] | g] スク リー ン の クリ ア ECOCCCCCCCPYYTEYYPYTPTLLCCLYULTYLLCLLLOLD 74 
OOLOR ーーーーーーーーーーーーー リー ン 表 示 カ ラー の 設定 OTCCKPETPECOETPPTTTYTYTT 75 
OSHLIN 一 ーーーーーー カー ソル の 行 位置 BOOOTTLCPLLLLYTLLLLL IL g6 
DRHAW ーーーーーーーーーー マ クロ ・ コ マン ド を 使っ た 描画 ero 97 
GET( グ ラフ ィ ックス ) 一 一 グラ フィ ッ ク ・ イ メー ジ の 保存 CPPTYLPTTTYTYTCYYTT ]15 
LINE ーーーーーーーーーー 線 ・ ポッ クス の 揚 図 eo 136 
LCOOATE 一 ーー デーーーー カ ー シ ジル 制 御 COCCOCCCCCODUECKYCUCEELLALKCUOUULULLULLLCELL ]4U 
PAINT ーーーーーー グ ラフ ィ ッ ク 領域 の 塗り つぶ し と パタ ー ン 埋め …… 165 
PALETTE 一 ーーーーーー パ レッ ト ・ カ ラー 設定 の eo ]68B 
COPY に ーー スク ジー シト ペ キ ジ の ヨ ピ ー htt 170 
PMAP (関数 ) -- 一 ーー 物理 座標 / 論 理 座標 … 必 むつ の oooemoeeetie… 309 
POINT (関数 ) 一 ピク セル の カラ ー 番 号 / 座 標 … 研 研 必 re 04 
POG (関数 ) ーーーーーー カ ー ソ ル の 杵 位置 oooomeoirorereoeoeoeoeeeeneei… 305 
PHESET 一 一 ーーーーーー ピク セル の カラ ー 設 年 oe ]7p 
PHINT( ス クリ ー ン ) ーーー ス クリ ー ン 表示 COCCOEKCYYPPOYPOEPPCTEPTPCTUTTPLYTTOT 73 
PGET - 一 一 ーーーーーーー 一 ピク セル の カラ ー 設 定 PCOOOCCTUOCETTLUEKTKTULLYTYTYTLTYYTYTL 177 
PUT (グラ フィ ックス ) ---- ス クリ ー ン ・ イ メー ジ の 描画 … 坪 研 180 
RE 記 N ニーーーー ニ テリ ーー ベク リー デシ ロ モー ド の 設定 ECUCCUCCCUCCOCTTTCCYTCEYTYKTI 194 
SOHEEN (関数 ) 表示 文字 の ASCII コー ド と カラ ー 属 性 ………… 810 
PO (関数 ) ーーーーーーー ス キップ CCOCCOCUCOOOOYOYTYYTYKPCCLYOC LTLLLL 17 
TA 日 (関数 ) ーーーーーーー タブ の 設定 YY で PPCEETTTYFTTEPKTTPLLCI dPP 
VIEW 一 ーーーーーー グラ フィ ッ ク の 物理 ビュ ー・ ポ ー ト の 定義 ……… g17 
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HU 





田 プ リン ター 





征 IMES (関数 ) 一 ーーーー 現在 の 時 羊 ro 
TIMERH ーーーーーーーーーー タ イマ ー・ イ ベン ト ・ ト ラッ ピン グ の 設定 ………… 
TIME 昌 (関数 ) ーーーーーーー 経過 秒 数 誠 いな の る の くく くい で や くも.0 あ も でる やら さら る すら な も も の 20689 むち の も も 





還 定 数 変数 


COMMON - 一 一 ーーーーー グロ ー バ ル 変 数 の 定義 上 eee 
CONST 一 一 ーーーーー シ ン ボ リッ ク 定 数 の 宣言 と 定義 …… ぐ … の の tt… 
DATA 一 ーーーーー HEAD ステ ー ト メン ト で 読み 込む デー タ の 定義 … 
DEFINT ーーーーーーーーー 一 型 の 設定 itmtmtmc 
DEFLNG ーーーーーーー 一 弄 の 設定 ii 
DEFSNG ーーーーーーー 一 弄 の ii 
DEFDBL 一 ーーーーーー 型 の 設定 COCCOECCUPPOKCCOUYYYCYYTYYLKYKLKLYLL 
DEFGTHR ーーーーーーーー 一 型 の 設定 iiimtmtrtrt 
leeegeesggetssssssksggil (に うー(7 の に コン 5) 5 MAMA ooo は 
LBOUND (関数 ) ーーー 添字 の 下限 ri 
ドー 変数 へ の 人 
LSET 一 ーーーーーー 文字 列 変数 へ の 左 詰め 代入 oreorereeeroeoeoeneem 
DPTION BASE 一 一 配列 変数 に お ける 添字 の 下限 の 設定 ……………… 
HANDOMIZE 一 一 一 一 乱数 発生 の 初期 化 BOOCCOCCUCPEYYYTNEPTEYCPLYTYLUECLLUKLL 
READ 一 ーーーーーー DATA ステ ー ト メン ト の デー タ の 読み 込み …… 
HESTORHE 一 ーーーーーー 読み 込む べき ATA ステ ー ト メン ト 行 の 指定 … 
HND (関数 ) 一 ーーー 一 乱数 の 発生 oo 
HGSET ーーーーーーーーー 文字 列 変数 へ の 右 詰め 代入 OPECOULLLLLLLTLLIYYYY 
HARHED ーーーーーーーーー 変数 の 共有 有余 ムジ iiiro 
eootmearaisheffgEmaae ロー カル 変数 の 塞 言 …irnrreooeeoeoeeererenrrrern… 03 
GWAP ーーーーーーーーーーーー 変数 の 値 の 入れ 替え …… の emem 0B 
TYPE 一 ーーーーーーーー ユー ザー 定義 型 変数 の 型 の 定義 …… ぐ ooii… 可 3 
UBOUND (関数 ) ーーー 添字 の 上 限 PCODOYTCCEEECCLCETLLLPLETKYLCTTTCOOCLLKLL dP6 
UOAGE$ (関数 ) 一 一 大 文字 へ の 変換 … ぐ ieoeoeoeoeneeneneerorr 37 
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MM 








較 メ モリ ー 管 理 





























BLODAD 一 一 ーーーーー メ モリ ー・ イ メー ジ ・ フ ァイル か ら の ロー ド ……… 57 
BSAVE 一 ーーーーーー メ モリ ー・ イ メー ジ ・ フ ァイル へ の セー ブ ………… 58 
CLEARH 一 ーー 変数 の 再 初期 化 / フ ァイル の クロ ー ズ 

/ ス タッ ク ・ サ イズ の 設定 eeeoeeoioiiiieoeiemieiehtihthtst 7P 
DEF_SEG 一 ーーーーーー セ グ メ ント ・ ア ドレ ス の 設定 …m の moriroeoeoieeeeis 9 
EHASE 一 ーー 静 的 配列 の 再 初期 化 ノ 動 的 配列 の 解放 …………… 0] 
FRHE (関数 ) ーーーーー 利用 可能 な メモ リー・ サ イズ の の omoromrereoeernerrr 4 
POKE 一 一 ーーーーーーーー メ モリ ー へ の 書き 込み mo 17] 
HEDIM ーーーーーーーーーー 配列 空 問 の 変更 oo 184 
PEEK (関数 ) ーーーーー メ モリ ー・ ア ドレ ス の スト ア 内 容 … ぐ の … の の ii… Hg 
ADD (関数 ) 2 に ea 文字 列 の 先頭 ア ド | レレ 人 CEHHKECCYTTHTKHTYTD dl9 
SETMEM (関数 ) far ヒー プ ブ の メモ リー・ サ イズ の 変更 …………… 313 
VAHPTH (関数 ) 一 一 セグ メン ト 内 で の 変数 の オフ セッ ト ・ ア ドレ ス …… 330 
VAHPTHS (関数 ) 一 一 セグ メン ト 内 で の 変数 の オフ セッ ト ・ ア ドレ ス …… 830 
VAHSEG (関数 ) 一 一 一 変数 の セグ メン ト ・ ア ドレ スス … riront 93p 
較 プ ログ ラム 制御 
CALL(QuickBASIC) 一 BUB プロ シー ジャ の 呼び 出し ……… の ti 59 
CALL/OALLS 他 の 言語 で 書い た プロ シー ジャ の 呼び 出し ………… Bl 
( 他 の 言語 ) 
DALL ABSOLUTE 機械 語 で 書い た プロ シー ジャ の 呼び 出し ……… 63 
CHAIN 一 一 ーーーーーーー- プロ グラ ム の 実行 oe 6 
DEOLARHEーーーーーーーFUNOTION お よび SUB の 起 言 の の …… 84 
(Quick BABIO) 
DEOLARHE ( 他 の 言語 ) 一 他 の 言語 で 書い た プロ シー ジャ の 宣言 へ ……………… 86 
DEF FNname 関数 の 定義 … 心 …ー ド iiieoeneernere…iri BB 
DO..LOOP ーーーーーー 一 繰り 返し 実行 oo d5 
較 本 エ ーーー ジ Hipme rmi ジブ 還 ゆ 29Tmrtte 89 
EXIT 関数 、 ル ー プ 、 プ ロ シ ー ジ ャ か ら の 強制 脱出 …… 109 
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FORL..JNEXTーーーーー 一 繰り 返し 実行 COCOCOCTECOCOOLYYY YY て Fr ]09 

















FUNOTION FUNOTION プロ シー ジャ の 定義 COCOCCUOKTEYTTYTY で 1 ] 1 1 
GOSUB 一 一 ーーーーーー サ ブル ー チ ン へ の 分 岐 ………… の の q の ド …… ド ーー…ー………… 118 
GOT0Dーーーーーーーーーー 強制 分 岐 … 上 oo 1 
| ドーーーーーーーーーーーーーーー 分 貞和 ee ]P 
ON event GOSUB 一 一 イベ ント ・ ト ラッ プ 用 サブ ・ ル ー チ ン の 開始 行 

の 指定 CUTYYTYYYYYYUTYUYYCCYYYYYYYTYELTKKYTLYLYYYKPFPFTYYYYYTY'T ]] 
ODN...GOSUB 一 ーーーーー サ ブ ・ ル ー チ ン へ の 分 | 岐 …t ホ へ ム ム ーー ドー ドー…ー…ー……… 153 
DN..GOTO ーーーーー 行 へ の 分 野人 …… で 人 …… ロ ドー 155 
DN UEVENT GODSUB 一 ユー ザー 定義 の イベ ント ・ ト ラッ プ 用 サブ ルー 

チン へ の 分 岐 人 … 直 oo 9BU 
HEM -ーーーーーーー シ ーー 注 和 ii ]BB 
HETURHN 一 ーーーーーーー サ ブ ・ ル - チ ン の 終了 人 修 研 な 碑 eee 190 
HUN 一 ーーーーーーーーーー プロ グラ ムン 実行 er 193 
SELEOT OOASE 一 一 一 多重 分 財 悟 lie 198 
ご し ビビ ヒロ 一 一 ーーーーーーーーーーー > グラ ム の 実行 の 一 時 停止 PCOCUULYCYTYYY TYP dB4 
GTOP 一 一 ーーーーーーーーー プロ グラ ム の 終了 tee pU5 
SUB 一 ーーーーーーーーーーー らい け 量 プロ シー ジャ の 定義 POOLDUUCCOYYPTYYYTTYTTYYYYTTI glB 
YSTEM ーーーーーーーー- プロ グラ ム の 終 隔 to gl9 
UEVENT 一 ーー ユー ザー 定義 の イベ ント ・ ト ラッ ピン グ の 設定 … 366 
WEND ーーーーーーWHILE ステ ー ト メン ト へ の 戻り ……………… 可 ] 
WHILE 一 一 ーーーーー 一 繰り 返し 実行 oe ppp 
男 DOS 
CALL ABSDLUTEー- 機械 語 で 書い た プロ シー ジャ の 呼び 出し ………… 63 
CALL INT86old MS-DOS の シス テム ・ コ ー ル ………mmreti… 64 
DOALL INT86xold MS-DOS の シス テム ・ コ ー ル … の ti 64 
CALL INTEHRUPT 一 MS-DOS の シス テム ・ コ ー ル …… の me 66 
CALL INTERHUPTX-MB-DOS の シス テム ・ コ ー ル … の ee 66 
DCOMMANDS (関数 ) 一 コマ ンド ・ ライ ン 引 数 eo gp 
ENVIHON ーーーーーーーー 環境 変数 の 変更 OOODCYEEPPPCTECYTYPTTTETEYTY で TTF で FT ] 還 
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機 
肢 
別 
ス 
0 
ト 
メ 
ら 2/ 
ト 
関 
数 
索 


に 








ENVIRHONS (関数 ) ーー 環境 変数 名 と 環境 文字 列 YUYUYYYCCLUOYCCLLTLT p5p 





























呈 HELL --ーーーーーーーD ロ 0 ロ 8 コマ ンド の 実行 OYKPCCLPLCCLCKYYYYT gHg 
田 文 字 列 処理 

CDBLS$ (関数) pe バイ ト 文 字 へ の 変換 EPCETYELEELLLUCCCLKYCCKCCLC g37 
CHRS (関数 ) ーー AOII コー ド / 漢 字 連続 コー ド 対 応 文字 ………… 698 
CSNGS (関数 ) ] バイ ト 文 字 へ の 変換 EEEPCTTYTTETEKKECYTCKCTLCCEK g45 
HEX お (関数 ) ーーーーーー 1]B 進 表現 の 文字 列 CLOSOLCUCOCO い よい pB7 
INGTR (関数 ) ーー 文字 列 の 位置 本 時 PP と LLY て OLC g74 
JIS の (関数 ) 5 昌明 1 ご に EE 7B 
KEXT 中 (関数 ) 文字 の 抽出 EECCLUCLLLLCLCCCLCCUUUALLCL い OU 79 
KINGTR (関数 ) 文字 位置 rr gBH 
KLEN (関数 ) ーー 一 文字 mm 可 ] 
KMIDS ーーーーーーーーー 一 一 文字 列 の 置き 換え TYOLLCUCLLLUL ]33 
KMIDS お (関数 ) ーーーー 部 分 文字 列 の 抽出 YELLCUCLULKLLCCCCCCULLLCUUUULLLLCLU PBe 
KPOG (関数 ) ーーーーー 文字 の 位置 oe gH4 
KTN 中 (関数 ) ーーーー 一 一人 句点 コー ドド ee PB5 
LOAGE (関数 ) ーーーー 小文字 へ の 変 揚 の io pH7 
LEFTS (関数 ) 文字 列 の 左端 部 分 の 抽出 lr gBH 
LEN (関数 ) 一 文字 列 の 長 さ / 変 数 の バイ ト ・ サ イズ ……………… 889 
LTHIMS お (関数 ) 先頭 空白 文字 の 除去 内 FPPPPEYYEPPETPTLLLCCCLCCLY て PD pdh 
MIDS ーーーーー ーー ニーーーー 文字 列 の 導き 換え CYPCCULCCLCCCOULUUCUUCUULLLU ]47 
MIDS お (関数 ) ーーーーーーー 部 分 文字 列 の 抽出 PPPOEPCCLCCELCCOCCCCUCOLCACCUCULLLL pdB 
MKI$ (関数 ) ーー 文字 列 へ の 変換 OLCUUCUDUULALU い OO 97 
MKL 品 (関数 ) Eh ーー 文字 列 へ の 変換 EYEELCLUCCUOCLLLSLCLUCLUULUL い CU g97 
MKG お (関数 ) ーーーーーー 文字 列 へ の 変換 YOYYCCLTLLLLLOOOLLUULCUOLLU gd7 
MKDS お (関数 ) ーーーーーー 文字 列 へ の 変換 DOLLUCLLULLOOLLL い pdH 
MKDMBFS (関数 ) 一 MBF フォ ー マ ッ ト 文 字 列 へ の 変換 ……t…… 699 
MKBMBFS (関数 ) 一 MBF フォ ー マ ッ ト 文 字 列 へ の 変換 …………… 899 
DOTS お (関数 ) 進 表 現 文字 列 へ の 変換 … ぐ iieiiernrnnreerr 0] 
HIGHTS お (関数 ) 文字 列 の 右端 部 分 の 抽出 EPCOLLCLLLCCOOLOO dUB 
THIM (関数 ) 文字 列 の 未 尾 空白 文字 の 除去 EPCPTPPPEPPCCCLCEEKLKYLDU 3HB 
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PADE 員 (関数 ) 一 一 空白 文字 列 …… の ム … ド ドド ドド ドド ドド ーー 31B 








THS (関数 ) ーーーー 文字 列 へ の 変換 … 司 mi 919 
THING 員 (関数 ) 一 反復 文字 呈 oo 3 
還 算 術 と 数 値 処理 

AB (関数 ) ーーーーーーー 絶対 値 POPPPPPPPPPUPPPPTTPPPCCPPUCKYPEUOUUULLKKKYTECCLUKKLCLLLKKTED dp 
ATN (関数 ) ーーーーーー 一 逆 正 接 の 計 監 ri g35 
DODBL (関数 ) ーー 一 一 一 倍 精度 型 実数 へ の 変換 …* ぐ ee_ 研 rernr p9B 
仙 MNIE (関数 ) ーーーーーーー 整数 型 数 値 へ の 変質 … 心 必 ム ム ドド oo g4H 
DLNG (関数 ) ーーーーーー 長 整 数 型 数 値 へ の 変換 ………… で で で ドド ドド …… g4] 
O0 (関数 ) ーーーーーーー 余弦 の 計算 eee g43 
OSNG (関数 ) ーーーーーー 単 精度 型 数 値 へ の 変換 … 心 | ド トド eeoeoreo… g44 
OVI (関数 ) ーーーーーーーー 数 値 へ の 変換 … 必 ムジ '…ー ド ドー g47 
4 上 (関数 ) ーーーーーーー 数 値 へ の 変質 … 必 ムー g47 
DOV8 (関数 ) ーーーーーーー 数 値 へ の 変換 …… ぐ の eee g47 
CVD (関数 ) ーーーーーーー 数 値 へ の 変換 ooo g47 
CVDMBF (関数 ) 一 IEEE フォ ー マ ッ ト 数 値 へ の 変換 …………… 849 
CVSMBF (関数 ) 一 一 一 IEEE フォ ー マ ッ ト 数 値 へ の 変換 ……………… 849 
EXP (関数 ) ーーーーーーー 指数 関数 の 計 監 re gBU 
FIX (関数 ) 一 ーーーーーー 小数 点 以下 の 切り 捨て oe 869 
INT (関数 ) 一 ーーーーー 一 小数 点 以下 の 切り 捨て eeeeoeeeeenrreerr 876 
LOG (関数 ) ーーーーーー 上 自然 対数 の 計算 PDOTCCTPYYUYLLLUCLYOYYYOTCUYCTLL gd 
GOGN (関数 ) ーーーーー 一 数 値 の 待 号 で oo 14 
IN (関数 ) ーーーーーーー 正弦 の 計算 の ei 15 
QRH (関数 ) ーーーーーー 平方 根 の 計算 COCCOUOCTCPCCECLCCCYYTLLKKKCLLLLLYETL い と ]B 
TAN (関数 ) ーーーーーー 一 正 接 の 計算 … の ee dg3 
VAL (関数 ) ーーーーー- 数 値 へ の 変換 ori 9gB 
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機 
能 
同 
4 
1 
ト 
メ 
ン 
ト 
関 
2 
索 


引 





画 | ロ 制御 
































開 INP (関数 ) ーーーーーーー 一 |/ ポー ト か ら 1 バイト oooeenenenenemnmir… gB9 

還 IOCTLS (関数 ) デバ イス ・ ド ライ バ か ら の 読み 取り …………… 977 

鐵 UT ーーーーーーーーーーー- 入出 力 ポ ボー ト へ の デー タ の 送出 …… の mr 165 

ト WAIT プロ グラ ム の 実行 の 停 目 omment 周 al 

還 較 エ ラー 処理 

開 BEE ピ ーー ビー 者 oe 56 
EHDEV (関数 ) エラ ー・ コ ー ド と デバ イス 名 oooeeeernrnn… g5B 
EHDEVS (関数 ) 一 一 一 エラー・ コ ー ド と デバ イス 名 … の eee 5B 
EHL (関数 ) 一 ーーーーー エラ ー 発 生 の 行 番号 … ぐ ee g5B 
EHH (関数 ) ーーーーー エ ラー・ コ ーー ド ト oe pg59 
EE 内 HOR ニ ーーーーーーーー エ ラー の シミ ミレ ルビ Netonmdn 108 
ON EHRHORH GOT ロ ーー エラ ー 処 理 ルー チン の 開始 行 の 指定 ……………… 50 
PHESUME ーー ーー グラム の 織 行 YYTEYYYYYYETYTYYYLKKCLLCCLLLULLULLL ]89 
靖 回 GON ーーーーーーrmr こ こ トレ ー ス の 開始 と 終了 CYPCEYLOCOLLLLOULLLLLLOO 同 及 
THOFF-ーーーーーーー ェ ーー トレ ー ス の 開始 と 終了 TYOTTOLOOT OO gg 
還 サ ウン ド 
PLAY ーーーーーーーー 音楽 の 演奏 PVPTTYTTTTYYTTYTYYYYTTYYTTKULLCUCOLLUCLLULUULLLLULULCLL dB] 
PLAY ーーーーーーーーー 演奏 イベ ント トラ ッ ピン グ の 設定 IL 369 
PLAY (関数 ) ーーーーーー 音符 の 数 YYYYYYYYYCLLLLCLLLOLYTLLLYIYT dB7 
GOUND ーーーーーーーー 一 一 音 を 出す EYEYLIYYTLATYKKLLLLLLLLOLLLCLUCUCULLULLLLI dB5 
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り 錠 5 


Ver.4 .5 で 追加 べ れ た 
ステ ー ト メン ト お よび 関数 

QuickBASIC Ver.4.5 で は 、 次 の 6 つの ステ ー ト メン ト と 1 つの 関数 が 追加 
され まし た 。 


に レー 
下 
『 
な 
で 
退 
加 
に 3 
れ 
し コ 
= 4 
テ 
リ 
ト 
ズ 
に 
ト 
お 
よ 
【9 
関 
数 





@ ON UEVENT GOSUB 
@ PLAY 

@PLAY {ON | OFF | STOP } 
@ SLEEP 

人 @ SOUND 

人 @ UEVENT 

@ PLAY() 


以下 、 こ れ ら の ステ ー ト メン ト お よび 関数 の 機能 に つい て 解説 し ます 。 
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ON UEVENT GOSUB 


ユー ザー 定義 の イベ ント ・ ト ラッ プ 用 サブ ・ ル ー チ ン へ の 分 岐 





画 機 能 

UEVENT ステ ー ト メン ト で 定義 し た ユー ザー 定義 の イベ ント ・ ト ラッ プ 用 
サブ ・ ル ー チ ン へ 分 岐 する 

画 書 式 


ドコ 
ーー 
な 
m 
で 
違 
加 
1 
れ 
た 
到 
信 
| 
ト 
メ 
「 


若尾 Q み 9 す ア 








ON UEVENT GOSUB { 行 番号 | 行 ラ ベル } 





固 引 数 


行 番号 | 分 岐 先 を 行 番号 また は 行 ラ ベル で 指定 する 。 





画 文 例 


UEVENT ON 
ON UEVENT GOSUB myEventTrap 
DO 


LOOP 


myEventTrap: 
UEVENT OFF 





較 ノ ー ト 
P 参照 ステ チー トメ ント : UEVENT 
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PLAY 
音楽 の 演奏 





画 機 能 
文字 列 で 指定 し た 音楽 を 演奏 する 
男 書 式 





に 
机 
P 
に 
ai 
師 
中 
に 3 
れ 
だ 
と 3 
0 
ト 
ズ 
ン 
ト 
お 
よ 
回 
数 


PLAY 音楽 文字 列 








固 引 数 








音楽 文字 列 






1 オク ター プ 上 げ る 。 
く 1 オク ター プ 下 げ る 。 
n( 0 一 6 ) オ クタ ー プ に 設定 する 。 









シ 
C か ら B の 直後 に 付け る と 半音 上 が る 。 
C か ら B の 直後 に 付け る と 半音 上 が る 。 
C か ら 日 の 直後 に 付け る と 半音 下がる 。 


1 二 二 加 と 6 ロロ G 
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トイ 
F 
tm 
で 
師 
加 
に a コ 
れ 
『/ コ 
< 
1 
ト 
に 4 
7 
ト 
お 
よ 








男 文 例 
crs 







絶対 音符 n(0 また は 1 一 84) を 鳴ら す 。 
1 一 84 は 、12 音 符 (C,C あ DD&EFF# れ G,G 
AA あれ B)、7 オク ター プ に 順次 対応 し て い 
る 。 

0 で 休 符 に な る 。 


1 音符 の 長 さ n を 全音 符 か ら 64 分 音符 で 指 
定 する ( 1 一 64)。 

MN ノー マル (1 音符 の 7/8 の 長 さ で ) 

レガ ー ト (1 音符 の 長 さ で ) 

スタ ッ カ ー ト (1 音符 の 3/4 の 長 さ で ) 


Tn 1 分 間 に お ける 4 分 音符 の 数 (32--255、 デ フ 
ォ ル ト は 120) 

Pn 停止 の 長 さ n を 全音 符 か ら 64 分 音符 で 指定 

する (1 一 64)。 


フォ アグ ラン ド て 演奏 する (すでに 行なわ れ 
て いる 演奏 が 終わ る まで 、 次 の 演奏 を 開始 し 
な い )。 

MB バッ ク グ ラン ド て 演奏 する (バッ ク て 演奏 し 
な が ら プ ログ ラム を 実行 で きる )。 

"X" 填 VARPTRS$( 文字 列 変数 ) 

音楽 文字 列 と し て 文字 列 変数 を 使う 。 























PRINT "さあ 、 みん な で ドレ ミ ミ の 唄 を 歌い まし ょ う !『 
PRINT "イチ ・ ニ ー・ サ ン 、 ハ イ ! 
Lemon$ = "L3D L7E L8F L8F L8E D L2F P16" 


PLAY "L3C L8D E P8 C P8 E P8 C P8 L2E P16": ' ド は ドー ナッ ツ の ド 
PLAY "X" + VARPTR$(Lemon$ ) : ” レ は レモ ン の レ 


36g 





PLAY 
演奏 イベ ント ・ ト ラッ ピン グ の 設定 





画 機 能 
演奏 イベ ント ・ ト ラッ ピン グ を 有効 また は 無効 に する 
画 書 式 





PLAY {ON | OFF | STOP ) 





男 引数 







演奏 イベ ント ・ ト ラッ ピン グ を 有効 に する 。 
有効 で ある あい だ 、ON PLAY(n) GOSUB ステ ー ト メン ト て 設定 
し た 最小 音符 数 未満 に な っ た か どう か チェ ッ ク し 、 未 満 に な っ た 
と き は その イベ ント ・ ト ラッ ピン グ の サ プ ブル ー チ ン を 実行 する 。 
演奏 イベ ント ・ ト ラッ ピン グ を 無効 に する 。 

OFF は 、 そ の イベ ント を 記憶 し な い が 、STOP は 記憶 し て いる 
の で 、 ト ラッ ピン グ で きる よう に な る と ON PLAY ルー チン を 
実行 する 。 


ON 






STOP 


画 文 例 


9 PaLAY(2) QOSUB aSongOfDOREHI 


PLAY ON 
時 " き あ 、 ドル の 人 い ましょ う し 3 
PR 


PLAY "L2C p で 

END 

aSongOfDOREM 
Lemon$ = kL3D L7E L8E 本 og D L2P P16" 
PLAY "L3C L8D E P8 CPBEP8C P16" 
PLAY "L3D L7E L8F LBT LBE R L2F P 

RETURN 


較 ノ ー ト 
ぁ 参照 ステ ー ト メン ト : ON event GOSUB 
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に 
る 

な 
は 
に 
記 
加 
っ コ 
れ 
レコ 
スズ 
デ 

I 

( 
メ 
グ 
ト 
お 
よ 
(9 
関 
数 





に 
な 
m 
で 
選 
加 
交 
れ 
だ 
に 
要 
| 
メ 
ト 
お 
よ 
が 
関 
24 





SLEEP 


プロ グラ ム の 実行 の 一 時 停止 





画 機 能 

指定 し た 時 間 が 経過 する まで 、 い ずれ か の キー が 押さ れる まで 、 あ る い は イ 
ベン ト ・ ト ラッ ピン グ が 行なわ れる まで プロ グラ ム の 実行 を 停止 する 

画 書 式 





SLEEP [ 秒 数 ] 





男 引 数 







停止 させ た い 時 間 を 秒 数 で 指定 する 。 
0 と し た と きま た は 省略 し た と き は 、 キ ー が 押さ れる まで ある い 
は イベ ント ・ ト ラッ ピン グ が ある まで プロ グラ ム の 実行 を 停止 す 
る 。 





画 文 例 


LOCATE 23, 10 
PRINT "プリ ンタ の スイ ッ チ を 確認 し て くだ さい ・..." 
SLEEP 10 





964 


SOUND 


音 を 出す 





玉 機 能 
スピ ー カ ー か ら 音 を 出す 
画 書 式 





ドー 
に 

に 
tn 
Ka 
選 
加 
人 
れ 
7 だ 
ス 
P 居 

I 

ト 
ル 。3 
Pi 
ト 
お 
PS 
(9 
関 
数 


SOUND 周波 数 , 長 さ 








固 引 数 


出し た い 音 の 周波 数 (37 一 32767) を 整数 で 指定 する 。 


1 秒 ノ 18 .2 を 単位 と する 音 の 長 さ を 指定 する 。 





男 文 例 


oneSecond = 18.2 


SOUND 900, oneSecond / 2 - 一 一 一 一 一 900 ヘ ルツ を 0.5 秒 出す 
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ご 
し 
ドコ 
PE 
っ 
= 
加 
人 
れ 
ん コ 
と 
ra 
i 
ト 
メ 
ン 
: 
お 
よ 
【9。 
関 
数 





UEVENT 


ユー ザー 定義 の イベ ント ・ ト ラッ ピン グ の 設定 





画 機能 
ユー ザー 定義 の イベ ント ・ ト ラッ ピン グ を 有効 また は 無効 に する 
画 書 式 





UEVENT {ON | OFF | STOP ) 





固 引 数 











ユー ザー 定義 の イベ ント ・ ト ラッ ピン グ を 有効 に する 。 
有効 で ある あい だ 、ON uevent(n) GOSUB ステ ー ト メン ト て 設 
定 し た ユー ザー イベ ント が 発生 し た か どう か チェ ッ ク し 、 発 生 し 
た と き は その イベ ント ・ ト ラッ ピン グ の サブ プルー チン を 実行 す 
る 。 
ユー ザー 定義 の イベ ント ・ ト ラッ ピン グ を 無効 に する 。 
OFF は 、 そ の イベ ント を 記憶 し な い が 、STOP は 記憶 し て いる 
の で 、 ト ラッ ピン グ で きる よう に な る と ON UEVENT ルー チン 
を 実行 する 。 






STOP 





一文 例 


UEVENT ON 
ON UEVENT GOSUB myEventTrap 
DO 


LOOP 


myEventTrap: 
UEVENT OFF 





較 ノ ー ト 
ぁ 参照 スチ テー トメ ント : ON UEVENT GOSUB 
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PLAY0( 
音符 の 数 





画 機 能 

BGM (バッ ク グ ラウ ンド ミュ ー ジ ッ ク ) の キュ ー (Queue) に お ける 音符 の 数 
を 知る 
画 書式 





PLAY (ダミ ー) 





男 引 数 と 戻り 値 









引 数 ダミ ー … 数 値 (何で も よい ) を 渡す 。 


戻り 値 | BGM に お ける 残り の 音符 数 を 返す 。 
フォ アグ ラウ ンド の と き は 、 0 を 返す 。 












男 文 例 


PLAY(1 ) 
田 ノ ー ト 


フォ アグ ラン ド お よび バック グラ ンド に つい て は 、PLAY ステ ー ト メン ト を 
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索 引 

CALL INTERRUPT PCPCCLLCPLCTYTP 66 
@ 記 号 CALL INTERRUPTX。………… 66 
$DYNAMIC CASE ELSE 
$INCLUDE : 0 
SSTATIC moo CDBLO ………… 

CDBL$ () POOLOPPPLULCLPLLCLLU 
@A CDECL 
ABS() PCEPUUYYYOLKYLLLLKYYLYYYYYLYYYY 232 CHAIN 
ACCESS …… の ドド oeeTm 157 CHDIR 
AND( 論 理 積 ) …… ひ つ Ci ご ご ll 補 の 40 CHR$() 
AND 式 Gi ど お る あき 5 まき の きる 220 CINT() 
AN ii 87 CIRCLE 
APPEND…… で で oooeoeeereneeer 156 CLEAR 
ASC …ーー ド ドド om 162 CLNG () 
ASC() POCCCOUOULCUUCCOCUCOULLOLLLKLO て こい 233 CLOSE 
ASCL コー ド … ぐ で eeeeeoi 233,238 CLS [0 | 1 | 2}] EUCDCPTPLDCOLLLLT 74 
ATNO 0 oo 235 COELOR …… で ドド oe 75 

COMO) ee 77 
@ 日 COMMAND$ POD LLP 242 
1 : 位 ROOEUOOOCEOCOOOPOOC COMMON SHARED ……… ド … ド 51 
BEEP COMMON PCCULPLLULLUDLLDKYYYYYYYY 78 
BF PCCOCUUUCOPLLLYYYLLLPPLLPLLLLCLPCLLY constant…eeeooeeoeeeeee 
BIN CONST … ひ eee 
BINARY COSO oh 
BLOAD [@⑥ に CCOCOCCPPOOPPOOCPPCPPPTEPPPPLLEETTP 
BSAVE CSNG() 
BYVAL CSNG$ () 

CSRLIN 
⑲ 〇 CVDO omment 
CALL(QuickBASIOOD で … ぐ の oo……… 59 | CVDMBF() 
CALL/CALLS( 他 の 言語 ) …… ひ … ド 61 1 CVIO rie 
CALL ABSOLUTE 5 
CALL INT86old_ ……… 
CALL INT86xold … で ti の re の ………… 
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⑱D 

DATA COOUULULLUCLLLPLLLLLPPPLC と と 81 
DATA ス テー トメ ント …………… 188 
DATE$ HDLLT て TTYTT TAI と Er 83 
DA 251 
DECLARE(QuickBASIC) ……… 84 
DECLARE( 他 の 言語 ) ………… 86 
DBRD 有 8 33,91 
DEF FNname…… パ トト ーーーー… 88 
DRRIN eyeee yeycedessssssieies 33,91 
DEELNG…… の ーー ドド 33 9 91 
BR eeekeesueesezssszordssree 90 
DEEFSNG DOUDUPPCLLLYYTYTYYYTPPKPPP 33 3 91 
Ra 33,91 
DIM HOUULUCXIKKCTTYPPLPLYYYPYYYTPLPTLLTTYTPY 93 
IM SHARRD で Gees 語る 51 
OLJEBOOE 徹 放 45.95 
DOUBLE HOUUCULUPUCOCLPYPLTPLLYYPTT TTF 94 
DRAW OUUUUUUUUUCLUULULYYPLLLLPLLLLYTL 97 
DS DCCCPLCCCPCLCPDLPPPLLUPLPLLCPLLLCCLCLLLPLKYY 162 
(ヨコ 

END DCCLCCULULCCLCYLYPPPKYPLPCLCLLPLLLCLTLL 
END OF FILE 

END SELCT CUPCCCDCCOL 
END SUB DCCDPLDUCLUTLETTTLPYPPPLLYT 
ENVIRON PPCCLLPPLLLLLLYYYYYYYYYYYYYTPP 
ENVIRON$ () CECCDCLUPLLLLLLULLLLLYYTK 
EOF () DOUCCULUULCUPCCPCLCPPLPLCLCLLLLLLLLD 
EQV (同値 ) PODPUPPLLPPLLLLUKYYYYYTY て YE 
ERASE PCDCCCCCPLLPLLLLLLLLLL 

ERDEV POCLLLPCUPLCLLLCCKLTYY 

ERDEV$ PCOCULPLLLLLPLPLPCLCCLLCKLLCLKTTL) 
ERL oe 
ERR POLPLLLULPLPLPEYLTPYYYEY YY KKY エ KT 
ERROR POCCCLDOPLCPLPPPDLLLPLPCLPLYTYYYYPE 
EXIT POOLOCYYKYIY て TFT て YY て で 














( 〇 】 器 
fa デ 層 信 ayasdStvanYSS2SYRsipyaea 61 
far ヒー プ の メモ リー・ 

サイ ズ の 変更 DOLLY て 313 
FIELD FOLLILLTIUULKTLXYTLKXLYY PPP と し Cr 105 
FILEATTR () YETKY NKK に TK て 261 
FILES soseyeeseeeweeeeieeaiaiesosieeiis ine ee も 108 
1 0 隊 和 きい 263 
RORJNBX 和 ooococc 44.109 
FRE() DOCK PO いい 264 
RIREERITE 了 人 orahynenaenssssoeossessso 265 
RUNCURION Keitsfeyianasodssveess 111 
FUNCTION お よび SUB の 宣言 …84 
FUNCTION プロ シー ジャ …… 48,111 
⑳( 
GET( グ ラフ ィ ッ クス ) 
GBIC( ジ ァイル moeeneee2enemas 
QOSUR Sweetssdssiessrssaaoooam 
GOTO DCPLLCLYPPLDLPLPPPULLLLULLKYYL で PLFTT 
d 昌 
HEX$ () PPCCUCLPLLLLLLLLLLCOUCLLCCLKEKLLY) 267 
@⑳ | 
IEEE フォ ー マ ッ ト 数 値 へ の 

と SE 
1 
IMP (包含 ) 
INKEY$ eeeeeeeeeeeaasiae る iie aaa egmiee る も 
INP() ……… 
INPUT ele 
INPUT$ () 
INPUT\() POOL YY ST た ルト で し レル 4 
INPUT #( フ ァイル ) の の eee…… 126 


INSTR () OLCCOPCOCCOUCCOLLCLL い いり 274 


INT () LC に いい に CCLLL 276 
INTEGER POPCPPCLPCPCCLPLLLLLLPCLLLLULLLUOL 94 
INT 番号 PPPPPCPCCCCCCLCCCCULLCLLLCCLCL 64 
IOCTLS () EPRPPPPPCPCLPCLLCCLLLLLLULLLLLL 277 





NR 281 
KMID$ 
KMID$() 
KPOS() 
KTN$() 


(回 


LINE 


LOCK 
LOCK READ 
LOCK WRITE……i…oiiioi 157 
LOF() 半音) て ビエ 292 
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MKDMBFES On …0 oon 299 
MKDSO oon 297 
MKI$ () " 
MKL$ () 

MKS$ () ・ 
MKSMBEF$ Oi 299 
MOD( 剰 集 ) … で で reoromooeoeererre 38 
⑯N 

NAME PPPCCCUPCULCKCLLCLCULLULCULLULLLULLULLLL 149 
near アド レス oe 61 
Ni 0 MCEEEEEEEEEEEPPPEPEPPPCEPPPTEPCTETP 189 
NOT (否定 ) 誠二 40 
( 〇 ) 

OCTSO omi 301 
090 半 EECOEEEEOOOOOCCEEHCHHETD 77,128,130 
ON room 77,128,130 
ON.J.GOSUB … ぐ で の rorororooeernrrre 153 
ON..GOTO PETCCCCCCUOCOOUULLULLLLU 154 
ON ERROR GOTO ……… 150 
ON event GOSUB PCEPPCPPLLTPLLCLD 151 
ON UEVENT GOSUB ……… 360 
62OEEEEECEHPPCERRERERTCTEEEHHEHHHHE 162 


OPEN (ファ イル) ……………… ド ドー 156 


OPEN " COMn : ” (通信) ……161 
OPTION BASE … tt 164 
OR (論理 和 ) POOLCPLPCLCLCCOCCCOLKLLOL 40 
OUT POCPPPPPCLCLDCLLLCPLCCCCLLOLLLLLLYLLC 165 
OUTPUT COCOCCCDCCKCCCOUUCLOCLLLO 156 
⑯ 品 

PAINT PPCPPPLPPLLPLPLLPLLLLLLLPCLKLLL 


PALETTE … 
PCOPY 。 …… 
PEEK() … 
PLAY COCCOPCCUPDCCPCKLCLPLLLLKLLLLLL 

PLAY Oh 
PMAPO hh 
POINT() 








PRESET ・… 
PRINT 
PRINT( ス クリ ー ン ) 
PRINT #( フ ァイル ) 
PSET PPPPPPLULPCLPUULLLPLUDLCKYLLLKKYYTL) 
PUT( グ ラフ ィ ッ クス ) 





PUT( フ ァイル ) oooeeemeeooorot 
⑯ 唱 
RANDOMU … "に iii… 156 
RANDOMIZE …( の ri の riot 182,307 
RB PVPPLCCLULLYCKIYYYLLLYLCLLLDLLLLKYLLLL 162 
READ rrhrmhririririiii 157,183 
READ WRITE POLOLLLCCLYYL OU 157 
READ ス テー トメ ント で 

読み 込む デー タ の 定義 LTT4 7 81 
REDIM Io 184 
REDIM SHARED … ひ 〇 ニード ドド ………… 51 
RE 186 
RESET om 187 





RESTORE の … の 人 (… の eert 188 
RESUME 上 0 …… 人 ドド 189 
RETURN … 層 ll lieee ド ーー 190 
RIGHTSO …… ド ドド oon 306 











RUN ……… ド ee 193 
⑳ ご 

SADDO hh 309 
SADD 関数 PPCCULPLCCULYLLUULYYLCTTPL PT 331 
SCREEN 本 和 パト トピ に ため よ ( つ 候 ( 違 ・ 104,217 
SCREEN (0 に oo tee 310 
SEEK … 層 teeeomeoeeeeeeeedd<。 196 
SEEK Oh 311 
SEO oi 61 
SETMEM (0) …0(… つ の iri< に ーー 313 
SGN () 

SHARED …… 51,78,.93,157 ,184,200 
SHELL 0 上 … 上 の 上 mmoeoeeeesrees 202 
SIN() 

SINGLE 

SLEEP 

SOUND 

SPACE$() … 

SPC() 

SQR () 

STEP 

STOP 

NM Mt EECOOCCCCEPEEPRPREPPRRPPPREP 319 
STRING ee 94 
STRINGS (0 ぐつ の tt… 320 
SUB ee 206 
SUB プロ シー ジャ ー…… の ie 48,59,206 
SWAE te 208 
symbolic constant ……ー ド ドー 31 















SYSTEM CU … eeeenrnrrrrm 209 
@T 
TAB() 
TAN( 
GMMMIE$ (ステートメント) の 7 210 
TIME$ (関数 ) ……………tit… 324 
模 MER( ス テー トメ ント ) fo 211 
TIMER (関数 ) 
TROFE で で oiiiiririi… 
FRON eonet 
4 り 9OEEPOEOOEOOOOOO 
(OUW 
UBOUNDO … で (iieieeereeer 326 
UCASESO omeeerrrrrrrr 327 
UEVENT 1 
UNLOCK 
UNTIL oe 
USING… ili 143,168,173,175 
⑮V 
VALO iri 328 
yariable rr 30 
VARPTRO 0 で oeerrrr 330 
VARPTRSO0 … で で imereie 330 
VARSEG ぐ で つつ Ioeeerernrnrrr 332 
1 101 伝 OECD 217 
VIEW PRINT …0(_iiiii… 219 
⑯W 
WAIT iii 220 
WEND ememe 221 
WHILE で iieeeneee 95.222 
WHILE..WEND (iiit 44 
WHILE ステ ー ト メン ト 

へ の 戻り …… ero 221 
WIDTH CECEPHPPPLEPCCCCCCEPPPEEEHLHKSED 223 








WRITE seeaeeeeeeeeeeeeeeeeeeeeee 157,226 
@X 
XOR (排他 的 論理 和 ) eieiAreteaa 人 人 40) 
XOR 式 YTV YUULLLKTT LO 220 
⑳ あ 行 
アー クタ ンジ ェ ン ト 
授 放 元 ィ . ブ *・ ペ ー ジ 
値 に よる 渡 irermrnnr 
(ペン ト ・ ト ラッ プ 用 サ プ ・ 

ルー チン の 開始 行 の 指定 ……… 151 
イン クル ー ド ・ フ ァイル の 

取り 込み PTYCLLLLLLLLCCLLLLDOLLIL) 337 
エラ ー 処 理 ル ー ナ ン の 

開始 行 の 指定 7 で 1 て OO は 、・ 150 
エラ ー の シミ ュ レ ー ト … で (iii 102 
エラ ー 発 生 の 行 番号 …… 〇 (io 258 
演算 子 ooo 38 





カレ ント ・ ビ ュー ポー ト の 


論理 座標 の 定義 assssseessssseee 225 
環境 変数 の 変更 志和 692.6i5l&e あ ざさ る る さる 100 
環境 変数 名 と 環境 文字 列 ………… 252 
関係 演算 子 eeeeeisee see 39 
関数 oo 24.88 
関数 、 ル ー プ 、 プ ロ シ ー ジ ャ 

か ら の 強制 脱出 POOOLL CC 103 
漢字 連続 コー ド ………… 233,238,321 
キー の 割り 込み … で で emem 130 


キー ボー ド か ら の 1 文字 ………… 268 


キー ボー ド か ら の 入力 …………… 124 
記号 定数 る 31 
逆 正 接 の 計算 PTY スス 235 
強制 分 岐 隔 で く 3DDCG ス エルト PTY て LLL く TK 120 
行 番号 RPCYKYCCOLCOCCOOLLLCSCLLCLO 26 
行 へ の 分 岐 PPPPCCLCCLCLUCLCLCCLCCLLLCLLL 154 
4 ぶす / ア CPPPPPCPPEHHHTEPPPPPPPPPPPPPCPEEEE 26 
空白 文字 列 LYCOS こん て よい に こい 316 
句点 コー ド … eeet 285 
グラ フィ ッ ク ・ イ メー ジ の 

保存 nap 116 
グラ フィ ッ ク の 物理 ビュ ー・ 

ポー ト の 定義 …… 〇 の ii……… 217 
グラ フィ ッ ク 領 域 の 塗り つぶ し と 

パタ ー ン 埋め … ぐ で oo の eieiiii… 166 
繰り 返し 実行 ie WT 95,109,222 
グロ ー バ ル 変 数 ぐに eo 50.78 
経過 秒 数 ぐ ぐ eoeoeieeenreerrernr 325 
構造 化 プ ログ ラミ ンダ …… の eeeieitn 41 
固定 長文 字 列 FPPTYPPPPLPOLPC 28.94 
コマ ンド ・ ラ イン 引数 ……… 242 
コン ii 26 
小文字 へ の 変換 POOLLLLYYT 287 
⑳ 行 
サブ ・ デ ィ レ クト リ の 

作成 て OLK LEO 148 
サブ ・ モ ジュ ーー ル … ooeeeerernr 47 
サブ ・ ル ー- チ ン の 終了 0 の ie……| 190 
サブ ・ ル ー チ ン へ の 分 岐 ……… 118.153 
算術 演算 子 PPPPPPPPLLLLPLLLPLLLLLLLLLLLLL ロ 38 
ジー ケシ ジジ ヤル 

ファ イル … の oo 126,139,175 
時 ii 210,324 
自然 対数 の 計算 eee ae 293 
指数 関数 の 計算 ee 260 
縦横 比 時 PT PTY TL て TL て 70 





16 進 表現 の 文字 列 ………………… 267 
出力 文字 数 の 設定 PPPPPPCLUPLCLLEKYC 223 
順次 構造 …oooooeeeeee 41 
使用 可能 な ファ イル 番号 ………… 265 
書式 制御 文字 列 ………… 143.173,175 
小数 点 以下 の 切り 捨て …… 263.276 
シン グル ・ モ ジュ ー ル で の で ーー 47 
シン ボリ ッ ク 定 数 ………………… 31.80 
数 値 型 PPECLCCULYYCLLLLCCLCLLLCCLCCCUCCCLLCLLL 28 
数 値 の 符号 ……………… ぐ ドド ii 314 
数 値 へ の 変換 seeeeeeeeeeeses 247,328 
スキップ ii 317 
スク リー ン ・ イ メー ジ の 描画 …… 180 
スク リー ン ・ ペ ー ジ の コピ ー ……170 
スク リー ン の クリ アァ ee 74 
スク リー ン 表 示 …‥…… の の 173,226 
スク リー ン 表 示 カ ラー の 設定 ……… 75 
スク リー ン ・ モ ー ド の 設定 …… 194 
ステ ー ト メン ト で e eeet 24,25 
正弦 の 計算 で eeereiri 315 
整数 ドド ooNioeoeneer 30 
整数 弄 … ト ドド ドー ドド onirn 94 
整数 型 数 値 へ の 変換 ……………… 240 
正 接 の 計算 で ……… ド io 323 
静 的 配列 の 再 初期 化 …………… 101 
セグ メン ト ・ ア ドレ ス …wew 90,309 
セグ メン ト 内 で の 変数 の 

オフ セッ ト ・ ア ドレ ス ……… 330 
絶対 徒 で 上 で omoeoeoeenrernerer 232 
先頭 空白 文字 の 除去 ……………… 295 
線 ・ ボ ックス の 描 図 ……………… 136 
⑱ た 行 
タイ マー・ イ ベン ト ・ 

トラ ッ ピ ング の 設定 ………… 211 
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タ ブ の 設定 PPCCCLCCLLLCLLCLCCLKYKYTYYLLYO 322 
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長 整数 型 数 値 へ の 変換 …………… 241 
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定数 ooo 30 
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動 的 配列 の 解放 … 会 上 上 101 
トレ ー ス の 開始 と 終了 …"… の ii… 212 
@⑱ な 行 
2 バイ ト 文字 へ の 変換 aa 237 
入出 力 ポ ー ト へ の デー タ の 

送出 PPPPPPDPCCUCCKLLCCCLLCLLLLLLCC に 165 
@⑱ は 行 
価 精 度 弄 の oe 94 
倍 精 度 型 実数 … 悟 oo 30 
倍 精 度 型 実 数 へ の 変換 …………… 237 
バイ ト 単 位 で の 

ファ イル 読込 み … ぐ (の ei… 270 
バイ ナリ ー・ フ ァイル … の ti 114,178 
配列 と 変数 の 型 の 宣言 ……… ひ で … 93 
配列 の 記憶 領域 の 

コン パイ ル 時 割り 当て ……… 338 
配列 の 記憶 領域 の プロ グラ ム 

実行 時 割り 当て … ぐ で の の oo 336 
配列 空間 の 変更 ……… iii 184 
配列 変数 ……ー ド ドド ドド onemm… 34 
8 進 表現 文字 列 へ の 変換 ………… 301 


374 


パレ ッ ト ・ カ ラー の 設定 …………] 168 
パレ ッ ト 番 号 …・ ぐ ooiieimiereniri 195 
反復 構造 … 層 … の ーー 44 
反復 文字 列 HOOCCCCCLCCPPLLPTEYPPLLLLLLETYI 320 
ビー ブ 導 …0iOooroeeeoeoeeeneenerrnrrr 56 
ビジ ュ ア ル ・ ペ ー ジ oee 195 
ピク セル の カラ ー 設 定 ……… 172,177 
ピク セル の カラ ー 番 号 / 座 標 ……… 304 
上 日付 83,251 
表示 文字 の ASCII コー ド ……… 310 
標 准 ii 271 
ファ イル ・ ア クセ ス の 

アン ロッ クー に … の oe 215 
ワ ジワ ァイル ・ ア クセ ス の ロッ ク "や 142 
ファ イル 上 の 位置 の 設定 ………… 196 
ファ イル 上 の 現在 位置 …………… 290 
ファ イル 内 の 次 の 位置 … の …… 311 
ファ イル の 移動 … 上 本 ……… 149 
ファ イル の オー プン ー… で ee ee 156 
ファ イル の 終わ り の テス ト ……… 254 
ファ イル の クロ ー ズ ……………… 73,187 
ファ イル の 消 云 ii 132 
ファ イル の パイ ト ・ サ イズ ……… 292 
ファ イル 名 の 表示 …… の 0 … の io……… 108 
ファ イル 名 の 変更 "で ぐ の の ei… 149 
ファ イル ・ モ ー ド … eeeeereon 261 
ファ ンク ショ ン ・ キ ー の 

割り 当て と 表示 …… ぐ (つの (ii… 128 
物理 座標 / 論 理 座標 ………………… 303 
部 分 文字 列 の 抽出 ………… 282.296 
プリ ンタ ーー 印字 …①m の mm の re… 143 
プリ ンタ ー・ ヘ ッ ド の 現在 行 …294 
プロ グラ ム ・ プ ロ シ ー ジ ャ ・ 

プ ブロッ ク の 終了 … で に ………… 99 
プロ グラ ム の 実行 …………… ド 68,193 
プロ グラ ム の 実行 の 停止 ……… 220 
プロ グラ ム の 終了 ………… 205,209 
プロ グラ ム の 続行 上 i] で …… の ei… 189 





⑳ ま 行 
マイ クロ ソフ ト ・ バ イナ リー・ 

フォ ー マ ッ ト ・ oonenrnn… 250 
マク ロ ・ コ マン ド を 

使っ た 描画 
マク ロロ 文字 式 仙人 
マル チ プ ル ・ モ ジュ ー ル oooaeaedt は 5 47 
メイ ン ・ モ ジュ ー ル oeoeemrerrrenr 47 
メタ トコ マヤ ンド oe oooeeeeereererrr 24 
メモ リ ・ ア ドレ ス の 

スト ア 内 容 … で < mioieioiii… 302 
メモ リー・ イ メー ジ ・ 

ファ イル か ら の ロー ド ………… 57 
メモ リー・ イ メー ジ ・ 

ファ イル へ の セー ブ ……((i… 58 
メモ リー へ の 書き 込み ers ssssesese 171 
文字 位置 esseeescespeoswseeesoeessoee ゃ る 280 
文字 の 位置 mg きる っ osaiaaisrgseseesos 284 
文字 の 抽出 PP 279 





文字 数 FRPPPCLELCCLLUUCCLCLCCCCCCDCLLCLCLLLD 281 











文字 数 単位 で の ファ イル 

クン 0 旨 FPPPEEPPPPPPPPEEEPPTPPPEPD 272 
文字 列 演算 子 … 上 ooo iii 39 
文字 列 弄 ee 28 
文字 列 の 位置 上 で eoeoooii… 274 
文字 列 の 置き 換え ………… 133.147 
文字 列 の 先頭 アド レス ‥……………… 309 
文字 列 の 長き roo 289 
文字 列 へ の 変換 297.319 
モー ドド で ee 156,159,194 
モジ ュー ルド に eeerri 47 
モジ ュー ル ・ レ ベル ・ コ ー ド ……… 48 
@⑱ や 行 
ユー ザー 定義 弄 変 数 
ユー ザー 定義 キー …… ぐ ieie… 131 
ユー ザー 定義 タイ プ 
要素 と 添字 
要素 名 …… oo 
余弦 の 計算 
⑱ ら 行 
ラジ アン … の err 235,243,315,323 
乱数 系 列 
乱数 発生 の 初期 化 上 で ……… 182 
乱数 の 発生 ooo 307 
ラン 多 ム アタ セス * 

ファ イル で で oe 114,178 
ラン ダム アク セス ・ フ ァイル ・ 

バッ ファ の 定義 24 おる ie る 98iis な 105 
リテラ ル 定 数 …… で tr の の の の 31,80 
利用 可能 な メモ リー・ サ イズ ……264 
レコ ー ド 変数 ………… ド ドド io 35 
ロー カル 変数 … ぐ ………… の の 50.203 
論理 演算 子 上 上 つ iriioioioioir 40 


索 引 一 375 


著者 略歴 

阿部 友 計 (あべ ・ と も か ず ) 

昭和 48 年 、 日 本 大 学 商学 部 卒業 

昭和 55 年 、 成 貴大 学 大 学院 経営 学 研究 科 博士 課程 修了 。 
< 著書 > 

「dBASE 四 PLUS ハンデ ィ イマ ニュ アル 」、「dBASE 四 PLUS 
プロ グラ ミン ダグ ダ 技法 」、「MS-DOS Ver.3.3 ハ ンド ブッ ク 」 
(以上 、 共 閉 、 ナ ツメ 社 )。 


本 書 に 対す る ご 質問 

本 書 に 対す る ご 質問 、 ご 意見 が あり まし た ら 、 下 記 の 
住所 まで お 手紙 に て ご 連絡 下さ い 。 電 話 に よる お 問い 
合せ は ご 遠慮 下さ い 。 

ご 質問 は で き る だ け 、 往 復 は が きか 返信 用 封筒 同封 の 
うえ いた だ けれ ば 幸い で す 。 


ナッ ツメ 出版 企画 株 式 会 社 書籍 第 2 編集 部 
質問 係 


QuickBASIC ハ ンド プ ブック Vol.2 リ ファ レン ス 





著 者 阿部 友 計 ⑥ Tomokazu Abe, 1990 


発行 者 田村 正隆 
制 作 ナツ メ 出 版 企画 株 式 会 社 


東京 都 千代 田 区 神田 神保 町 1-52 加 州 ビ ル 3F (〒101) 


電話 03(3295)3921 (代表 ) 
発行 所 株 式 会 社 ナ ツメ 社 


東京 都 千代 田 区 神田 神保 町 1-52 加 州 ビル 2F ( 和 〒101) 


電話 03(3291)1257 (代表 ) 
振替 東京 3-58661 


印刷 所 ラン 印刷 社 


ISBN4-8163-0961-6 Printed in Japan 











ナツ メ 社 定価 1.300 円 本 体 1.262 円 
ISBN4-8163-0961-6 C2054 P1300E 


